TryStrToDate нужен пример использования функции.

← →
Alex7 © (2007-08-17 07:22) [0]

Здравствуйте, уважаемые мастера.
Воспользовался "F1" и посмотрел часто задаваемые вопросы, но примера не нашел.
Задача такая: нужно определить является ли значение в MaskEdit
(!99/99/00;1;_) датой. Ожидаемое значение - по форме "dd.mm.yy"
Спасибо.

← →
Elen © (2007-08-17 08:17) [1]

Плохо хелпы рулишь :

procedure TForm1.MaskEdit1Change(Sender: TObject); var dat:TDateTime; begin DateSeparator:="."; if TryStrToDate(MaskEdit1.Text,dat) then close else caption:="Its a sin" end;

TryStrToDate нужен пример использования функции. Найти похожие ветки