10.3. ПОДПРОГРАММЫ ДЛЯ РАБОТЫ С ВАРИАНТАМИ

Для работы с вариантами можно использовать такие подпрограммы:

Таблица 10.2. Подпрограммы для работы с вариантами

function VarAsType(const V: Variant; VarType: Integer): Variant;

Преобразует данные варианта V к типу, определяемому параметром VarType

procedure VarCast(var Dest: Variant; const Source: Variant; Var

Type: Integer) ;

Преобразует данные варианта Source к типу,определяемому параметром VarType, и помещает результат в переменную Dest

procedure VarClear(var V: Variant) ;

 

Освобождает динамическую память, если она была связана с вариантом, и дает ему тип varEmpty

procedure VarCopy(var Dest: Variant; const Source: Variants;

Копирует параметр Source в вариант Dest

function VarFrom-DateTime(DateTime: TDateTime):Variant;

Возвращает вариант, содержащий данные DateTime типа дата-время

function VarIsEmpty(const V:

Variant): Boolean;

Возвращает True, если вариант V не содержит данных

function VarIsNull(const V: Vari

ant) : Boolean;

Возвращает True, если вариант V содержит данные неопределенного типа (varNull) ',

function VarToDateTime(const V:

Variant): TDateTime) ;

Преобразует данные варианта V к типу дата-время

function VarToStr(const V: Vari ant) : String;

Преобразует данные варианта V к строке ;

function VarType(const V: Variant) : Integer;

Возвращает тип хранящихся в варианте данных i