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

Текстовые поля   Найти похожие ветки 

← →
Серый ©   (2006-09-24 17:14) [0]

Имеются три текстовых поля(Edit).Необходимо сделать так,чтобы в эти поля могли вводиться только цифры от 1 до 9,точка(только в одном месте) и знак минус только перед скобкой.Остальные символы игнорируются.Все это написать в одной процедуре при помощи OnKeyPressed.

---

← →
Ketmar ©   (2006-09-24 17:16) [1]

пиши. разрешаю.

---

← →
SergP ©   (2006-09-24 17:28) [2]

я тоже не против...

---

← →
default ©   (2006-09-24 19:09) [3]

и я, даже мысленное хлопаю по плечу для подбодрения

---

← →
Джо ©   (2006-09-24 21:37) [4]

А мне вообще идея не нравится.

---

← →
ProgRAMmer Dimonych   (2006-09-24 23:31) [5]

Как уже неоднократно упоминалось, все ненужные символы в обработчике события OnKeyPressed заменяем на #0. Для точки и минуса - только в том случае, если выполняется определённое условие. Если проблема возникает в том, как обработать три TEdit в одной процедуре, то:

В процедуру-обработчик OnKeyPressed передаётся параметр Sender:TObject. Берём его и используем так:

(Sender as TEdit).Text

Всё текст нужного контрола можно получить. И т.д.

Надеюсь, понял вопрос правильно...

---

← →
Ketmar ©   (2006-09-24 23:42) [6]

>[5] ProgRAMmer Dimonych 24-Sep-2006, 23:31
>Надеюсь, понял вопрос правильно...
неправильно. тут вообще никакого вопроса не было.

---

← →
ProgRAMmer Dimonych   (2006-09-24 23:45) [7]

> [6]
ОК, не вопрос, а проблему...

---

← →
SergP ©   (2006-09-24 23:46) [8]

Переопределить CreateParams

---

← →
Джо ©   (2006-09-24 23:51) [9]

> [8] SergP ©   (24.09.06 23:46)
> Переопределить CreateParams

"Все это написать в одной процедуре при помощи OnKeyPressed".

© Серый

---

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

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



Память: 0.46 MB
Время: 0.033 c