Thema: Delphi Overload und Arrays

Einzelnen Beitrag anzeigen

quendolineDD

Registriert seit: 19. Apr 2007
Ort: Dresden
781 Beiträge
 
Turbo Delphi für Win32
 
#1

Overload und Arrays

  Alt 20. Nov 2007, 17:54
Hallo DP-Community,

ich sitz gerade an einer Unit, welche HTML Dateien erzeugen soll und dementsprechende Funktionen bereitstellen soll. Nun habe ich gerade ein klitzekleines logisches Problem und ein Problem, was sich meiner Kentniss derzeitig entzieht.

Hierzu ein Auszug aus der Deklaration

Delphi-Quellcode:
procedure DoTable(border, width: integer; value: array of string); overload; //normale Tabelle
procedure DoTable(border, width: integer; value: array of array of string); overload; //2 Dimensionale, 2-spaltige Tabelle
Dies nutze ich, um dem Benutzer die Möglichkeit zu geben, normale Tabellen zu gestalten aber auch 2-spaltige.

Nun weiß ich nicht, wie ich abfragen kann, ob das übergebene Array mehrdemensional ist oder nicht um danach die Tabelle zu gestalten.

Delphi-Quellcode:
procedure THTML.DoTable(border, width: integer; value: array of string);
var
i : integer;
begin
target.Add('<table width='+width+'px border='+border+'px>');
for i := 0 to length(value) do
  begin
    target.Add('<tr>')
    target.Add('<td>'+value[i,0]+'</td><td>'+value[1,i]+'</td>')
    target.Add('</tr>')
  end;
target.Add('</table>')
end;
Ebenso komme ich gerade nicht darauf, wie ich auf die 2Spalten und x Zeilen richtig zugreifen kann?!
Da müsste ja die 1. Zeile value[0,0] und value[0,1] sein.

Also in einer Schleife
value[i,0] und value[i, 1] ?!

Danke schonmal für die Antworten ...
Grüße aus Dresden
Lars S.
Wer nicht mit der Zeit geht, geht mit der Zeit.
  Mit Zitat antworten Zitat