Советы по Delphi
       

Проверка дат


function ValidDate(const S : String) : Boolean;BEGINResult := True;tryStrToDate(S);exceptON EConvertError DO Result := False;end;END

[000556]



Содержание раздела