Einzelnen Beitrag anzeigen

Benutzerbild von Nalincah
Nalincah

Registriert seit: 18. Jul 2003
898 Beiträge
 
Delphi 6 Professional
 
#1

Strg+F8 --> Procedure aufrufen

  Alt 16. Okt 2003, 09:40
Ich hab ein Memo und wenn man Strg + F8 drückt soll der die procedure von Button4 aufrufen. Hab bisschen im Forum gesucht und mir das hier zusammengebastelt...Klappt aber leider nicht

Delphi-Quellcode:
procedure TDB_Frame.Button4KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if ((Shift = [ssCtrl]) and (Key = VK_F8)) then
    Button4.Click;
end;
Sebastian
Ehemals bekannt als General2004
  Mit Zitat antworten Zitat