function VarArrayOf(const Values: array of Variant): Variant;
//Im folgenden Beispiel wird ein eindimensionales variantes Array mit fünf Elementen erzeugt. //Alle Elemente haben den Typ Variant und können deshalb Werte mit wechselnden Typen aufnehmen. //Besonders zu bemerken ist, dass das letzte Array-Element wiederum selbst eine Variante ist.var A: Variant; begin A := VarArrayCreate(0, 4, varVariant); A0 := 1; A1 := 1234.5678; A2 := 'Hello world'; A3 := True; A4 := VarArrayOf(1, 10, 100, 1000); WriteLn(A2); { Hello world } WriteLn(A42); { 100 }end;