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

Вниз

Опять про VarArrayCreate.   Найти похожие ветки 

 
AlexanderSK ©   (2003-02-26 15:53) [0]

V: Variant;
...
V := VarArrayCreate([0,10], тип_варианта);
TVarData(V).VType = (varArray + тип_варианта)

А как грамотно узнать, что V - это массив, и собственно из чего этот массив состоит?


 
Digitman ©   (2003-02-26 16:02) [1]

наличие флага varArray в прочитанном идентификаторе типа VType, собссно, и говорит, что вариантная переменная V в дан.момент инициализирована для хранения массива

поле "тип_варианта" указывает на тип элементов этого массива


 
AlexanderSK ©   (2003-02-26 16:07) [2]

>Digitman ©
Это понятно! А вот как не зная тип_варианта и того что это массив: во-первых понять что это массив, а во-вторых, какого он собственно типа?


 
Roma ©   (2003-02-26 16:16) [3]

>AlexanderSK © (26.02.03 16:07)

if VarIsArray(V) then
begin
// это массив

if not VarIsEmpty(V) and not VarIsNull(V) then
begin
// этот массив не пустой

DimCount := VarArrayDimCount(V); // это размерность массива
for i := 1 to DimCount do
begin
// определяем типы элементов массива
case VarType(V, VarArrayLowBound(V, i)) of
end;
end;
end;
end;


Код чисто для примера, не проверялся... Чаще F1 нажимай...



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

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

Наверх




Память: 0.47 MB
Время: 0.018 c
14-30069
Карелин Артем
2003-02-19 09:57
2003.03.10
Алгоритмы проверки ИНН, ОГРН, КПП и прочих номеров.


3-29768
mib431
2003-02-19 22:31
2003.03.10
Проблема с большими базами на FoxPro


3-29707
Кило
2003-02-18 15:18
2003.03.10
Как вызвать в процедуре саму себя?


1-29828
TButton
2003-02-24 21:17
2003.03.10
динамические массивы и операции


1-29804
DVE
2003-02-27 16:33
2003.03.10
Не трассируется DLL!!! Что делать!