Процедура VarArrayRedim( var A: Variant; HighBound: Integer );
Модуль: System
Описание
Процедура изменяет верхнюю границу младшей размерности Variant-массива. Новая граница определяется параметром HighBound. Параметр A должен иметь тип Variant или OleVariant. Все элементы массива сохраняют свои значения, а новые элементы устанавливаются в ноль или пустые значения. Если параметр A не является Variant-массивом или недостаточно памяти для увеличения размеров массива, то возникает исключение EVariantError.
Пример var
V: Variant; begin
V:= VarArrayCreate( [0, 3], varVariant);
V[0]:= VarArrayHighBound(V, 1);
V[1]:= 'Один';
V[2]:= 'Два';
V[3]:= 'Три'; If V[0]<4 then VarArrayRedim(V, 4);
V[4]:= 'Четыре'; end;
