компонент 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 для ввода дат.

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