Array in eine Variable vom Typ Variant ablegen

[xtro]

Hallo.

Ich habe das Problem, dass ich einer Funktion eines OLE-Objects
einen Integer-Array übergeben muss, die Funktion aber nur eine
Variable vom Typ Variant akzeptiert.

In VB kann ich dies ganz einfach mit folgendem Code realisieren:

Dim varArray As Variant
varArray = Array(1,2,3)

Kennt jemand eine Lösung, wie dies in Delphi umzusetzten ist?

Ich habe es schon mit VarArrayOf() versucht, aber die
Ole-Funktion akzeptiert diesen Typ nicht. :sad:

[xtro]

Zum Glück gibt es noch mehrere Foren :-D, da mir in diesem Forum keiner Helfen konnte :roll:.

Hier die Lösung, falls auch andere mal dieses Problem haben :warn::

wenn anstelle von

varArray: Array of Variant;

nur eine Variable vom Typ Variant definiert und dann mit VarArrayCreate das Array erstellt wird,

var A: Variant;
A := VarArrayCreate(0, 4, varVariant);

dann funktioniert es.

[Luckie]

Ich entschuldige mich hiermit im Namen der Delphipraxis Gemeinde, dass wir deinem Anspruch auf eine Lösung nicht nachkommen konnten. Dein monatlicher Unkostenbeitrag wird dir natürlich wieder zurücküberwiesen.

Wie vielen Mitgliedern hast du denn schon geholfen seit du hier angemeldet bist? was nicht heißen soll, dass man erst Anspruch auf eine Antwort hat, wenn man eine gewisse Anzahl helfender Beiträge verfasst hat. Jedem der hier angemeldet ist, wird so gut es geht geholfen, auf freiwilliger Basis wohl gemerkt.