Запрет ввода с клавиатуры букв

[Человек_Борща]

нет нельзя...
ReyPress событие нажатий клавишь.. , все то связно с вводом с клавиотуры кароче..

[De_Kurlzz]

тоже нужна помощь по этому вопросу, необходимо сделать запрет на ввод всех символов, кроме цифр, сколько способов не перепробовал, не помогает, пробовал вот этот способ, тоже нет:

Сообщение от mihali4

Все просто:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (key in ['0'..'9']) then
key:=Chr(0);
end;

В чём моя ошибка?:

[Баламут]

М-да... Процедура определена. Тут все верно, не придерешься. А кто будет обработчик onKeyPress эдита писать? Код должен быть именно там! Т.е. в Object Inspector идем на вкладку Events и 2 раза кливаем на строке onKeyPress. И именное там пишем приведенный код. В общем это основы Делфи.

[De_Kurlzz]

Благодарю!

Сообщение от Баламут

В общем это основы Делфи.

, мы его не проходим, т.е. никакую теорию нам по нему не рассказывают (только чуть-чуть, прям совсем чуть-чуть), всё сами должны кумекать)