Форум: "Основная";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];
ВнизSafearray в Delphi Найти похожие ветки
← →
defenseur (2003-07-23 11:14) [0]Всем привет,
Не подскажите, как объявить в delphi что-то типа safearray, а то на код
var
sa: safearray of integer;
компилятор ругается, говорит что неизвестный идентификатор
← →
Плохиш (2003-07-23 11:16) [1]Что такое safearray?
← →
clickmaker (2003-07-23 12:08) [2]A: Variant;
A := VarArrayCreate([0, 5], varInteger);
A[0] := 1;
...
A[5] := 777;
← →
ggsoft (2003-07-23 12:17) [3]в Delphi 6, (нет 5-го под руками):
1. uses ActiveX
2. SafeArray он и есть SafeArray... see declaration
---------
PSafeArrayBound = ^TSafeArrayBound;
{$EXTERNALSYM tagSAFEARRAYBOUND}
tagSAFEARRAYBOUND = record
cElements: Longint;
lLbound: Longint;
end;
TSafeArrayBound = tagSAFEARRAYBOUND;
{$EXTERNALSYM SAFEARRAYBOUND}
SAFEARRAYBOUND = TSafeArrayBound;
PSafeArray = ^TSafeArray;
{$EXTERNALSYM tagSAFEARRAY}
tagSAFEARRAY = record
cDims: Word;
fFeatures: Word;
cbElements: Longint;
cLocks: Longint;
pvData: Pointer;
rgsabound: array[0..0] of TSafeArrayBound;
end;
TSafeArray = tagSAFEARRAY;
{$EXTERNALSYM SAFEARRAY}
SAFEARRAY = TSafeArray;
----------
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.08.04;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c