OnKeyup

[Terrance!]

Не понимаю, почему у меня не обрабатывается нажатие клавиш - букв алфавита вот так

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key=212 then ...

или даже вот так

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key=(ord('ф')) then ...

Но при этом нажатие на enter или на стрелку вверх работает нормально.
Может, просто я не правильно код клавиши ввёл? Но кодировку символов я смотрел в учебнике delphi, если всё же номер символа другой, тогда подскажите кто нибудь где взять таблицу с точными значениями символов.
Заранее спасибо !

[MaxNik2009]

Не понимаю, почему у меня не обрабатывается нажатие клавиш - букв алфавита вот так

Key - это код клавиши, а не буквы. По этому в твоем случае надо:

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key=65 then ...

или

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key=(ord('А'{на английской раскладке})) then ...

Если тебе необходимо отлавливать именно ввод букв, то используй

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

здесь Key как раз и есть код буквы.