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

Вниз

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;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
1-10247
iNew
2003-07-21 08:59
2003.08.04
Скорость работы StringList и TextFile.


3-10130
Space
2003-07-15 11:29
2003.08.04
Округление значения переменной


14-10425
Igor__
2003-07-17 17:10
2003.08.04
Как выбрать сканер и монитор????


14-10437
Дима
2003-07-18 08:29
2003.08.04
Дельфи для начинающих


14-10395
Igorek
2003-07-14 12:27
2003.08.04
Мы наконец-то открыли сайт - www.siriussoft.com