Строка является датой?

← →
AlexXn (2005-01-10 16:09) [0]

Как определить строка является датой или нет?

try
StrToDate(Value);
ShowMessage("Date");
except
ShowMessage("not Date");
end

Такой вариант неприемлем. Хотелось бы без exceptions.

← →
TUser © (2005-01-10 16:10) [1]

TryStrToDate

← →
olookin © (2005-01-10 16:11) [2]

А так:

try
StrToDate(Value);
ShowMessage("Date");
except
end;

?

← →
AlexXn (2005-01-10 16:14) [3]

>TUser
В 5 Delphi такой функции нет...

← →
olookin © (2005-01-10 16:16) [4]

[3] AlexXn (10.01.05 16:14)

По моему, TUser пошутил...

← →
AlexXn (2005-01-10 16:17) [5]

В Delphi7(не знаю как в 6) такая функция есть..

> По моему, TUser пошутил...
Не, я серьезно. Даже в справку специально слазил.

PS. Чем не угодили эксепшены? И если уж действительно оооочень хочется без них обойтись - наверное, можно самому проанализировать строку или подключить TRegExpr.

StrToDateDef возможно это в 5 есть, и посмотри ее реализацию в дельфевых исходниках...
в 7х это
function StrToDateDef(const S: string; const Default: TDateTime): TDateTime; begin if not TryStrToDate(S, Result) then Result := Default; end;

Строка является датой? Найти похожие ветки