Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.03.12;
Скачать: CL | DM;

Вниз

Что внутри Variant?   Найти похожие ветки 

 
kreyl   (2006-02-25 21:06) [0]

Есть класс, использующий для хранения параметра тип Variant (поскольку там может быть и integer, и string, и double).
И вот встал вопрос проверки введенного пользователем. То есть нужно узнать, можно ли этот variant счесть строкой, или целым, или дробным.
Стандартные функции типа VarIsType(...) не срабатывают, поскольку с их точки зрения тип варианта - неизменно varOleStr.
Не очень хочется превращать вариант в строку и разбираться, допустимые ли там символы... Есть ли еще :) варианты?
Заранее спасибо :-)


 
unknown ©   (2006-02-25 21:32) [1]

Variant - хитрая штука :-)
Используй свой "VarIsType", например :

 function vIsType(v:Variant;vType:word):Boolean;
 begin
   case  vType of
     varDouble:
       Result:=VarType(v) in [varDouble,varCurrency];
     varInteger:
       Result:=VarType(v) in [varSmallint, varInteger, varSingle,
         varShortInt,varByte,varWord,varLongWord,varInt64];
   end;
 end;



Страницы: 1 вся ветка

Текущий архив: 2006.03.12;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.048 c
3-1137593732
samalex
2006-01-18 17:15
2006.03.12
Таблица с маской ввода


2-1140952057
kot137
2006-02-26 14:07
2006.03.12
добавление поля в табл. с текущей датой


2-1140503578
Wood
2006-02-21 09:32
2006.03.12
Закрыть TExcelApplication без сохранения


2-1140641543
вася
2006-02-22 23:52
2006.03.12
массив и сеть


2-1140728065
Kolan
2006-02-23 23:54
2006.03.12
Как сделать чтобы форма вернула результат...