Thema: Delphi HotKey ---> HotProblem

Einzelnen Beitrag anzeigen

Benutzerbild von toms
toms
(CodeLib-Manager)

Registriert seit: 10. Jun 2002
4.648 Beiträge
 
Delphi XE Professional
 
#3

Re: HotKey ---> HotProblem

  Alt 7. Jan 2004, 15:09
Hi,

Verstehe nicht ganz, warum du die HotKey Komponente verwendest.
Es geht doch auch so:

Delphi-Quellcode:
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (ssCtrl in Shift) and (Key = $53) then // Ctrl + S
    Senden1.Click;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
   KeyPreview := True;
end;
Thomas
  Mit Zitat antworten Zitat