Question

Разработать приложение, в котором код нажатой клавиши клавиатуры вывести на форму в компонент Memo1, а символ нажатой клавиши клавиатуры вывести на форму в компонент Memo2. Делфи

Answer 1

Ответ:

в событиях ....KeyPress всех элементов на форме пропиши код:

//-----------------------

procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);

begin

 memo1.Lines.Add(inttostr(ord(Key)));

 memo2.Lines.Add(Key);

end;

//-----------------------

Свойства ReadOnly у обоих memo установи в true

Или приложил готовый проект. Переименую proj2.txt в proj2.zip. Сайт не дает прикреплять архивы....

Объяснение:

cb80548ce0123d4d86551b0ad8599be0.txt