var Mas: Variant; begin Mas:=VarArrayCreate([0, 2], varVariant); Mas[0]:=15; Mas[1]:='Text'; Mas[2]:=VarArrayOf([0, True, 'OtherText', 14.0]); end;