VB Array/Variant nach Delphi konvertieren

[Neutral General]

Array() in VB erzeugt aber auch kein low level Array sondern ein Variant array. Deswegen macht es in meinen Augen keinen Sinn.

Aber gut. Wenn es "low level" Delphi Arrays sein sollen dann probiers so:

Delphi-Quellcode:

type
  TVarArray1D = Array of Variant;
  TVarArray2D = Array of TVarArray1D;

var Options: TVarArray2D;
    res: Variant;
begin
  res := 'foo.runMacro(...)';

  Options := TVarArray2D.Create(TVarArray1D.Create('Option One', 1234),
    TVarArray1D.Create('Option Two', 'Michigan'),
    TVarArray1D.Create('Option Three', res));
end;

Geht in den neueren Delphi Versionen etwas leichter, oder es geht auch anstrengender mit manuellem SetLength und danach einzelne Zuweisungen.
Aber daran glaube ich nicht. Falls du nämlich deiner Funktion ein "Variant" übergeben musst dann kannst du das da oben nicht mal übergeben..

[DCoderHH]

Zitat von Neutral General:

Geht in den neueren Delphi Versionen etwas leichter, oder es geht auch anstrengender mit manuellem SetLength und danach einzelne Zuweisungen.
Aber daran glaube ich nicht. Falls du nämlich deiner Funktion ein "Variant" übergeben musst dann kannst du das da oben nicht mal übergeben..

Jup, das stimmt. Die Funktion möchte ein OleVariant haben. Packe ich Options von Typ TVarArray2D nochmal in eine Variant-Variable compiliert es. Während der Laufzeit gibt es aber trotzdem den Fehler, den alle Versuche bisher geliefert haben (EOleException).