Стр. 101 - Информатика. Программирование в среде Delphi. Часть 1

Информатика. Программирование в Delphi
101
Рис. 6.6
9. Оформим процедуру EditKeyPress следующим образом.
//процедура выполняется при нажатии клавиши в любом из полей Edit
procedure TForm1.EditKeyPress(Sender: TObject; var Key: Char);
var
//переменная типа TEdit
Edit:TEdit;
begin
Рис. 6.7