Es funktioniert
Ich hab mir nochmal den VB Code angeschaut. Der ReDim tmpObj(1, 2) Befehl gibt in den Klammern die Obergrenzen für das 2 Dim. Array an! Es muss also wie folgt definiert werden:
Delphi-Quellcode:
tmpObj := VarArrayCreate([0,1,0,2], varVariant);
tmpObj [0, 0] := 'ID';
tmpObj [1, 0] := 1;
tmpObj [0, 1] := 'X';
tmpObj [1, 1] := GeocodeResult[egriX, 0];
tmpObj [0, 2] := 'Y';
tmpObj [1, 2] := GeocodeResult[egriY, 0];
Danke für die Hilfe
Salomon