Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Проверка строки на соответствие формату даты [D7, XP]


Gromozeka ©   (2007-05-05 07:52:00) 

День добрый!
Собственно сабж...
Как это правильно сделать?
пробовал во этоЖ

function TDM.IsDate(str: string): Boolean;
var  dt: TDateTime;
begin
 Result := True;
 try
   dt := StrToDate(str);
 except
   Result := False;
 end;
end;

но вылетает ошибка-исключительная ситуация.
Спасибо.


Джо   (2007-05-05 08:57:00) [1]

Точнее, TryStrToDate.


Джо   (2007-05-05 08:53:00) [2]

TryStrToDateTime


Alarm   (2007-05-05 08:16:00) [3]

Для начала замени str : string
поскольку это процедураprocedure Str(X [: Width [: Decimals ]]; var S);
ну, а затем можно будет продолжить обсуждение » Джо: » Формальный параметр, совпадающий с именем процедуры System.Str, в данной ситуации ничему помешать не может.


Наверх

Титульная страница Поиск, карта сайта Написать письмо