Strg+F8 --> Procedure aufrufen

[Nalincah]

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;

[Garby]

Hallo,

du musst den Code in das KeyDown-Ereignis des Memos schreiben.
Hier schauts so aus, als ob er im Ereignis des Buttons stehen würde....

[Nalincah]

Ups....Du hast recht...Klappt...