Witam wszystkich.Było już setki razy ... lecz nie wiem jak to rozwiązać.Otóż mam w OnKeyDown takie oto przechwycenie Klawisza Spacji :
procedure TForm2.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_SPACE then showmessage('użyłeś spacji');
end;
I działa niby wszystko jak należy z jednym ALE... klawisz spacji można użyć tylko raz... później już go nie przechwytuje...