Функции и процедуры Delphi. Справочник.

IV. ФУНКЦИИ И ПРОЦЕДУРЫ ДЛЯ РАБОТЫ С ПЕРЕМЕННЫМИ РАЗЛИЧНЫХ ТИПОВ ДАННЫХ

3. Функции и процедуры для работы с типом Variant

Функция VarArrayCreate(
const Bounds: array of Integer;
VarType: Integer ): Variant;

Модуль: System

Описание
Функция создает массив значений типа Variant. Границы размерностей массива определяются параметром Bounds, который должен содержать пары значений (нижняя и верхняя граница). Тип элементов массива указывается в параметре VarType, и должен соответствовать одному из значений поля TvarData.VarType (См. описание функции VarType), за исключением значений varArray, varByRef и varString. Для создания Variant-массива строк необходимо в параметре VarType указать значение varOleStr.
Если для элементов массива задан тип значе-ний varVariant, то они, в свою очередь, могут представлять собой Variant-массивы.

Пример
var
   S: string;
   Mas: Variant;
begin
   Mas:= VarArrayCreate([0, 3], varVariant);
   Mas[0]:= VarArrayHighBound(Mas, 1);
   Mas[1]:= 'Быть или не быть?';
   Mas[2]:= 12.34567;
   Mas[3]:= VarArrayOf( [7, 354, 0, 21, 66, 189] );
   S:= VarToStr( Mas[1] );       // S:= 'Быть или не быть?'
   S:= VarToStr( Mas[3][1] );  // S := 354
end;