Текущий архив: 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.012 c
