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

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

Работа с датами [D6]


skirdov ©   (2003-02-02 19:24:00) 

Привет, мастера!
Допустим, что вводится дата в текстовое поле. Как проверить, корректна ли она? Например, чтобы нельзя было ввести дату 35.02.2003? Может функция какая есть? А?
Спасибо.


Anatoly Podgoretsky   (2003-02-02 22:14:00) [1]

Пустой даты как таковой не существует, такое понятие допустимо только для строк или баз данных.
Ты можешь присаоить любое значение, которое тебя усьраивает или которое ты считаешь пустым.


skirdov   (2003-02-02 22:12:00) [2]

Есть таблица, в которой имеетсе String-поле, в котором хранятся даты (но не только даты) и некоторые записи имеют некорректные значения. Если пользователь хочет дату поменять, то показывается спец. форма с компонентом DBDateTimeEditEh и если дата некорректная (напр, 32.02.2003), то происходит ошибка. Вот я и хочу заменить некорректную дату на пустую, т.е. чтобы в DBDateTimeEditEh показалось нечто вроде " . . ".


mrcat   (2003-02-02 21:35:00) [3]

Что значит "пустой даты"? зачем такое понадобилось?
Записывайте в TDateTime;


skirdov   (2003-02-02 21:31:00) [4]

А как присвоить переменной значение пустой даты ( . . )?
Можно, конечно, написать varDate := " . . ", но вполне может быть, что в системе используются символы "/" вместо точек, др. региональные настройки и т.д. и все это анализировать тоскливо...


Романов Р.В.   (2003-02-02 19:28:00) [5]

Как обычно
try
StrToDate(Edit1.Text)
except
ShowMessage("Это не дата");
end;


mrcat   (2003-02-02 19:27:00) [6]

есть, например, компонент TMaskEdit


Наверх

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