Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.02.10;
Скачать: [xml.tar.bz2];

Вниз

Работа с датами   Найти похожие ветки 

 
skirdov   (2003-02-02 19:24) [0]

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


 
mrcat   (2003-02-02 19:27) [1]

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


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

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


 
skirdov   (2003-02-02 21:31) [3]

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


 
mrcat   (2003-02-02 21:35) [4]

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


 
skirdov   (2003-02-02 22:12) [5]

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


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

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



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.02.10;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.009 c
1-28773
Chizh
2003-01-16 22:58
2003.02.10
Подскажите, plz, как скопировать файлы из буфера обмена


1-28758
defenseur
2003-02-01 12:17
2003.02.10
Проверка наличия пути на диске


14-29101
Anatoly Podgoretsky
2003-01-26 02:04
2003.02.10
Именинники 26 января


14-29018
Cobalt
2003-01-21 21:16
2003.02.10
Delphi<->Kylix3


6-28970
Scorpion [BC]
2002-12-18 19:45
2003.02.10
Как через локальную сеть общаться по микрофону?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский