Функция VarArrayHighBound( const A: Variant;
Dim: Integer ): Integer;
Модуль: System
Описание
Функция возвращает верхнюю границу указанного измерения (размерности) Variant-массива. Размерность определяется параметром Dim: первое измерение - 1, второе - 2 и т.д. Если параметр A не является Variant-массивом или задана не существующая размерность, то возникает исключение EVariantError.
Пример var
V: Variant;
i, j : Integer; begin
V:= VarArrayCreate([1, 4], varVariant);
V[1]:= 'Уходящей весне прокричал я вослед';
V[2]:= 'Голубая, постой, отзовись!';
V[3]:= 'Что же будет скажи через 1000 лет?';
V[4]:= 'И она мне ответила - ЖИЗНЬ!';
V[4]:= 'В. Свистунов'; for i:= VarArrayLowBound(V,1) to VarArrayHighBound(V,1) do Memo1.Lines.Add(V[i]); end;
