Скачать: CL | DM;

Как проверить, что введенный текст в DBEdit соответствует формату   Найти похожие ветки 

← →
Дина   (2004-11-18 09:45) [0]

Как проверить, что введенный текст в DBEdit соответствует формату даты?

---

← →
Bryke   (2004-11-18 18:00) [1]

А причем здесь конференция "игры" ??

---

← →
КиТаЯц ©   (2004-11-19 07:29) [2]

Да, игры тут не при чем... действительно... :(
Лана, поможем девушке :)

DBEdit.onExit:=  DBEdit.Exit;

DBEdit.Exit(sender: tObject);
 var i: integer;
begin
for I:=1 to length(DBEdit.text) do
 if not (DBEdit[i] in ["0".."9"])
   then begin
     showmessage("Цифири давай!");
     DBEdit.SelectAll;
     DBEdit.SetFocus;
   end;
end;

Пишу на ходу придумывая, т.ч. может орфографическая :) ошибка быть или что-то не сработать...

---

← →
КиТаЯц ©   (2004-11-19 07:34) [3]

Тьфу, сам сейчас прочитал что написал... %)
Это было "соответствует ли формату целые ЧИСЛА"... Для даты надо считать виндусовские переменные
var ShortDateFormat: string;
var LongDateFormat: string;
(Unit SysUtils)
и, соттветственно, сделать похожую проверку...

---

← →
Anatoly Podgoretsky ©   (2004-11-19 07:48) [4]

try StrToDateTime except не оно end;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c