Einzelnen Beitrag anzeigen

thomas2009
(Gast)

n/a Beiträge
 
#1

Keypress Problem bei Setfocus

  Alt 23. Jan 2009, 00:54
Hallo


Delphi-Quellcode:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin

if(Key =39)then
    begin
      ShowMessage('Pfeil rechts');
    end;
Es funktioniert nur wenn der Focus in einem Edit !
Wenn ein BitBtn Button zum beispiel den Focus hat, dann funktioniert nicht
  Mit Zitat antworten Zitat