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

Ввод с клавиатуры   Найти похожие ветки 

← →
Rate   (2003-12-19 20:19) [0]

Как заблокировать ввод с клавиатуры определённых букв или цифр?
Или ещё какой-нибудь способ, но только чтобы в поле Edit можно было вводить только цифры и буквы а,б,в.

---

← →
jack128 ©   (2003-12-19 20:27) [1]

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (Key in ["0".."9", "a".."c"]) then Key := #0;
end;

---

← →
Rate   (2003-12-20 17:52) [2]

большое СПАСИБО!!!!

---

← →
Александр из Минска ©   (2003-12-20 20:18) [3]

А если вставить текст из буфера??? Что тогда?
Я предлягаю свой вариант на http://delphimaster.net/view/1-1071661113/ (он однотипный)

---

← →
Rate   (2003-12-24 20:06) [4]

Хитрая подковырка.

---

← →
Rate   (2003-12-24 20:15) [5]

Кстати, относительно сообщения[3], а если вводить десятичное число?

---

← →
Александр из Минска ©   (2003-12-24 21:47) [6]

Тогда в условии надо учитывать либо код запятой (44), либо код точки (46)...

---

← →
Александр из Минска ©   (2003-12-24 21:48) [7]

Пардон, #44 и #46

---

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

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



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