14.10.2007, 12:54
|
|
Участник форума
Регистрация: 30.08.2006
Сообщений: 181
Провел на форуме:
1058786
Репутация:
45
|
|
Помогите сделать процедуру обработки ошибки введения, тоесть (не цифрового значения кроме клавиши BackSpace).
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
end;
Это надо сделать таким образом чтоб присвоить Key:=#0 |
|
|