Ввод с клавиатуры

← →
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], а если вводить десятичное число?

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

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

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