Delphi-PRAXiS - Delphi Strg+F8 --> Procedure aufrufen

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi Strg+F8 --> Procedure aufrufen (https://www.delphipraxis.net/10317-strg-f8-procedure-aufrufen.html)

Nalincah

16. Okt 2003 08:40

Strg+F8 --> Procedure aufrufen

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

16. Okt 2003 08:43

Re: Strg+F8 --> Procedure aufrufen

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

16. Okt 2003 08:47

Re: Strg+F8 --> Procedure aufrufen

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

Alle Zeitangaben in WEZ +1. Es ist jetzt 09:52 Uhr.