Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2008.03.09;
Скачать: CL | DM;

Вниз

safearray   Найти похожие ветки 

 
reg   (2008-02-02 19:07) [0]

Подскажите (желательно на маленьком примере) как инициализировать такой массив и как добавить в него два элемента. Заранее спасибо!


 
KilkennyCat ©   (2008-02-02 20:57) [1]

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


 
reg   (2008-02-13 14:12) [2]

Извиняюсь, что поздно отвечаю, просто времени не было....
В общем пробую работать с помощью модуля ActiveX, используя готовые функции но следующий код не работает


var
i:integer;
z:variant;
m:psafearray;

begin

m := SafeArrayCreateVector(varInteger,0,2);
for i:=0 to 1 do
SafeArrayPutElement(m,i,i);

for i:=0 to 1 do begin
SafeArrayGetElement(m,i,z);
listbox1.items.add(z);
end;
end;

Подскажите пожалуйста, что я делаю не так.


 
Сергей М. ©   (2008-02-13 15:10) [3]

PSafeArray - это тот же самый PVarArray.

Создай обычный VarArray (см. VarArrayCreate) и получи сcылку на SafeArray (см. VarArrayAsPSafeArray) на управляемые им данные.


 
DiamondShark ©   (2008-02-13 15:20) [4]


> for i:=0 to 1 do
> SafeArrayPutElement(m,i,i);

для начала:

for i:=0 to 1 do
begin
z := i;
OleCheck(SafeArrayPutElement(m,i,z));
end;



Страницы: 1 вся ветка

Текущий архив: 2008.03.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.034 c
15-1201711092
kernel
2008-01-30 19:38
2008.03.09
PHP из Perl


15-1201944617
Андрей
2008-02-02 12:30
2008.03.09
Браузер файлов на диске


11-1184105149
Dimaxx
2007-07-11 02:05
2008.03.09
Установка пакета KOL 2.73 начисто - что случилось?


10-1144044391
Alex_C
2006-04-03 10:06
2008.03.09
предупреждение при закрытии COM-serv


11-1185319893
Andrey_rus
2007-07-25 03:31
2008.03.09
Напутано с цветами clXXX