Mehrdimensionales dynamisches Array an procedure übergeben

[Baeuerle]

Hallo,

ich habe folgenden code:

Delphi-Quellcode:

TAttributes = array[0..1] of WideString;

procedure test(attrlist: array of TAttributes);
begin
//...
end;

procedure CallTest;
begin
test([VarArrayOf['Name','Anton'],VarArrayOf['Alter','36']]);
test([VarArrayOf['Name','Gregor']]);
end;

Gibt es eine Aufrufmöglichkeit in ohne diese VarArrayOf like this ???

Delphi-Quellcode:

test([['Name','Anton'],['Alter','36']]);
test([['Name','Gregor']]);

[himitsu]

ich befürchte nicht, aber sowas ginge noch

Delphi-Quellcode:

procedure test(attrlist: array of const);

test(['Name', 'Anton', 'Alter', '36']);
test(['Name', 'Gregor']);

[Alaitoc]

Ich würde es ja eigentlich immer so machen...

Delphi-Quellcode:

type
  TEindimensional = array[0..1] of String;
  TMehrdimensional = array of TEindimensional;

procedure test(attrlist: TMehrdimensional);
begin
//...
end;

procedure CallTest;
var bsp:TMehrdimensional;
begin
  // <- Hier der Inhalt
  test(bsp);
end;

Oder wie es himitsu beschrieben hat...wobei da vll zuweisbare typisierte Konstanten noch ganz hilfreich wären...

Wobei vll natürlich auch ganz hilfreich wäre:

Delphi-Quellcode:

type
  TAttributes = record
    sName : String;
    iAlter: Integer;
  end;

procedure test(attrlist: array of TAttributes);
var
  infos:TAttributes;
begin
  infos.sName:='Anton';
  infos.iAlter:=36;
  test(infos);
end;