Советы по Delphi




Проверка дат


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

[000556]




Содержание  Назад  Вперед