Текущий архив: 2010.03.14;
Скачать: CL | DM;
Вниз
Доступ к элементам двумерного PSafeArray Найти похожие ветки
← →
Darvin (2010-01-14 15:03) [0]Здравствуйте!
Мне нужно работать с двумерным PSafeArray. Пример работы с одномерным я нашел и отладил. Есть код для создания двумерного массива:var
Sign : array of TDoubleDynArray;
Value : OleVariant;
Bnds : Array of TVarArrayBound;
I, J : Integer;
Signal : PSafeArray;
begin
...
<Заполнение двумерного динамического массива Sign>
SetLength(Bnds, Length(Sign) );
for I := 0 to Length(Sign) - 1 do begin
Bnds[I].LowBound := 0;
Bnds[I].ElementCount := Length(Sign[I]);
end;
Signal := SafeArrayCreate ( VT_VARIANT, Length(Sign), Bnds );
try
for J := 0 to Length(Sign) - 1 do
for I := 0 to Length(Sign[J]) - 1 do begin
Value := Sign[J][I];
SafeArrayPutElement ( Signal, I, Value );
end;
finally
end;
Вопрос, в функции SafeArrayPutElement второй парамет - индекс элемента. А как получить доступ к элементу двумерного массива?
Смотрел здесь:
http://www.rsdn.ru/article/com/varsafearr.xml
Все примеры для одномерных массивов. В других местах тоже не нашел...
Delphi 2009 Windows Vista
← →
Сергей М. © (2010-01-14 15:08) [1]На том же RSDN:
http://www.rsdn.ru/forum/delphi/226856.flat.aspx
← →
Darvin (2010-01-14 15:24) [2]Спасибо, прикольно.
← →
Сергей М. © (2010-01-14 15:31) [3]
> прикольно
Твоя фимилия, случаем, не Щукина ?)
Страницы: 1 вся ветка
Текущий архив: 2010.03.14;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.015 c
