внедрить массив в olevariant

Мир вам братья. Нужно масив x[1..50] of real преобразовать в объект olevariant, и все это на delphi.

 

в olevariant массив не поместится. Он вроде всего 16 байт занимает.

 

Физически может он в него и не внедряется, просто там может содержатся указатель на данные. Просто мне нужно в chartspace.setdata, в качестве источника данных указать olevariant переменную, на ВБ, это просто там любой массив подходит а в делфе сложнее.

 

SafeArray of real можно присвоить переменой типа OleVariant

 

Будьте любезны угостите исходником, хоть несколько строк. Я документацию на SafeArray нашел, сейчас изучаю, а программу нужно дописать в кратчайшие сроки.

 

пока дело выглядит так
x:OleVariant;
ChartSpace1.Clear;
ChartSpace1.Charts.Add(0);
ChartSpace1.Charts[0].SeriesCollection.add(0);
x:=VarArrayCreate([0, 15], varSingle);
for i:=1 to 15 do x:=i;
ChartSpace1.Charts[0].SeriesCollection[0].SetData (2,-1,x);

Компилиться нормально, но график не рисует выдает пустую координатную сетку.

 

http://www.gekko-software.nl/Delphi/art08.htm

 

Спасибо за все советы, программа написана.