PostHeaderIconDelphi. Функция VarAsType( const V: Variant; VarType: Integer ): Variant;

Функция VarAsType( const V: Variant; VarType: Integer ): Variant;

Модуль: System

Описание
Функция преобразовывает значение переменной типа Variant в значение, Variant тип которого указан в параметре VarType. Значение параметра VarType должно соответствовать одному из значений поля VarType типа TVarData и не должно включать константы varArray или varByRef (Список констант TVarData.VarType см. в описании функции VarType). Если значение не может быть преобразовано к заданному типу, то возникает исключение EVariantError. Действие функция VarAsType аналогично действию процедуры VarCast.


Пример
var
   VString, VDateTime: Variant;
begin
   VString:= '28.02 10:45';
   VDateTime:= VarAsType(VString, varDate);
   MessageDlg( VDateTime, mtInformation, [mbOk], 0);
end;

 
Copyright © 2007-2010 IsIProg.ru. All Rights Reserved.