![]() |
Hotkey für Button
Hallo,
ich als blutiger Anfänger wollte in meinem ersten Programm nachdem jetzt alles so funktioniert, wie ich es will, globale Hotkeys benutzen. Habe jetzt nach einiger Suche mit Google herausgefunden, dass das wohl am einfachsten mit RegisterHotkey funktionieren soll... Allerdings weiß ich jetzt nicht, wie ich genau meine Prozedur aufrufe :( Also ich habe für den Button "ard" eine Prozedur TForm1.ardClick(Sender:TObject), die aufgerufen werden soll, wenn ich die Tastenkombination STR+SHIFT+a drücke. Dafür habe ich
Delphi-Quellcode:
oben in mein Programm geschrieben, wie es das Tutorial zeigt. Und dann soll ich eine neue Prozedur machen, die wie folgt lautet:
type
TForm1 = class(TForm) procedure FormCreate(Sender: TObject); procedure FormDestroy(Sender: TObject); private { Private-Deklarationen } procedure WmHotkey(var Msg: TMessage); message WM_HOTKEY; public { Public-Deklarationen } end;
Delphi-Quellcode:
Allerdings weiß ich jetzt nicht, wie ich meine Prozedur aufrufe. Bei mir kommen immer irgwelche Fehler, wenn ich mein Programm kompilieren will... Mit welchen Parametern muss ich die Prozedur öffnen? Oder anders formuliert: wie kann ich aus einer Prozedur eine andere aufrufen, die ich sonst mit einem Button ausführen würde?
procedure TForm1.WmHotkey(var Msg: TMessage);
begin if (Msg.WParam = 1) then begin // Hier auszuführenden Code einfügen end; end; Wäre dankbar für jede Hilfe! Vielen Dank im Voraus! greez irrerelb |
Re: Hotkey für Button
Hallo
Zitat:
Button1Click(Sender) auf. PS: Ich verstehe nicht ganz, warum du den Hotkey Code und nicht den relevanten Teil veröffentlicht hast. Der Titel resp Hotkeycode hat doch nichts zu tun mit der eigentlichen Fragestellung :gruebel: Zitat:
|
Re: Hotkey für Button
Also mein Button heißt "ard", habe jetzt einfach ardClick(Sender) geschrieben, aber da kommt "nicht deklarierter Bezeichner" :(
|
Re: Hotkey für Button
Delphi-Quellcode:
;)
ard.Click();
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:21 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz