[di_jus]

проблема немного не в том.
Просто когда я кидаю на форму несколько кнопок 'formkeydown' отключается

даже так

Код:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  n:=n+1;
end;

что делать?