Einzelnen Beitrag anzeigen

Tesla2k

Registriert seit: 18. Jun 2008
1 Beiträge
 
#1

Wert eines TVarRec einer Array of const zuweisen

  Alt 29. Dez 2008, 14:02
Ich will eine Wert aus einer array of const wieder als Parameter eines anderen array of const verwenden.
Ungefähr so:

Delphi-Quellcode:
procedure a(x:array of const)
begin
end;

procedure b(x:array of const)
begin
  a([x[0]])
end;
Das erzeugt allerdings ein compiliert Fehler.

Eine Lösung wäre jedes mal ne case anweisung auf VType

Delphi-Quellcode:
case x[0].VType of
  vtInteger: a([x[0].VInteger]);
  vtString: a([x[0].VString]);
  ...
end;
Da ich das allerdings sehr oft machen müsste wollte ich Fragen, ob es da evtl eine andere Lösung gibt.

Vielen Dank
  Mit Zitat antworten Zitat