Вниз
Скачать: CL | DM;

компонент MaskEdit   Найти похожие ветки 

 
чайник   (2003-12-10 08:29) [0]

уважаемые мастера, как перевести значение из компонента MaskEdit маска типа даты " _ _ " в дату, использовал свойство Text, StrToDate(MaskEdit1.Text) не получается, спасибо.


 
Романов Р.В. ©   (2003-12-10 08:46) [1]

EncodeDate


 
чайник   (2003-12-10 09:00) [2]

не совсем понял, делаю EncodeDate(copy(me1.Text,7,2),copy(me1.Text,4,2),copy(me1.Text,1,2) выдает ошибку Incompatible types: "Word" and "TMaskedText". извините, может совсем глупый вопрос, но я чайник...


 
HSolo ©   (2003-12-10 09:04) [3]

function EncodeDate(Year, Month, Day:
Word)
^^^^^
А Вы ей string-и подаете, вот она и обижается :))


 
чайник   (2003-12-10 09:11) [4]

это понятно, но как перевести тип string в тип word, вот в чем вопрос.


 
Романов Р.В. ©   (2003-12-10 09:15) [5]

F1-StrToInt


 
чайник   (2003-12-10 09:22) [6]

ras:=EncodeDate(StrToInt(copy(me1.Text,7,2)),StrToint(copy(me1.Text,4,2)),StrToint(copy(me1.Text,1,2)))-EncodeDate(StrTo int(copy(me2.Text,7,2)),StrToint(copy(me2.Text,4,2)),StrToInt(copy(me2.Text,1,2))) т.е. мне нужно получить разность дат введенных через MaskEdit, теперь ругает

Incompatible types: "Integer" and "Extended"


 
Silver Alex ©   (2003-12-10 09:49) [7]

а почему через StrToDate(MaskEdit1.Text) не получается?

> Incompatible types: "Integer" and "Extended"

может ras Integer?должен быть Double


 
TUser ©   (2003-12-10 09:49) [8]

Поставь коллекцию Jedi - там есть специальный edit для ввода дат.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c
1-75207
Sanych_k
2003-12-11 10:36
2003.12.23
Как оброботать клик правой кнопкой над динамической кнокой?


14-75332
От_сишника
2003-12-01 09:17
2003.12.23
EAccessViolation ? в С++


14-75385
SergP
2003-11-28 08:49
2003.12.23
Интернет - свалка всякой заразы....


9-75068
Кен
2003-06-03 03:45
2003.12.23
К GLScene прикрутили bsp и md3. Как теперь между ними проверять и


3-75092
digester
2003-11-30 13:09
2003.12.23
ПОМОГИТЕ Пожалуйста с IBQUERY




   Наверх