Главная страница
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.053 c
4-1135072687
Volf_555
2005-12-20 12:58
2006.03.12
Как вывести на экран все иконки из dll-файла?


15-1140247857
Mozart
2006-02-18 10:30
2006.03.12
lynx -dump


2-1140523737
Маленький мук
2006-02-21 15:08
2006.03.12
Простой, но нерешаемый вопрос.. :(


2-1140975612
Volkodav
2006-02-26 20:40
2006.03.12
Полоса перемотки для MediaPlayer1


1-1139500353
Piter
2006-02-09 18:52
2006.03.12
Указание кодировки текста в буфере обмена