Здравствуйте, sergey sivolovsky, Вы писали:

SS>Если можно то пример

Если это касается Delphi то:

v := VarArrayCreate([0, Length(MyArray)], varVariant);
for i := 0 to Length(MyArray) do
begin
v[i] := MyArray[i];
end;


Чтото типа такого...