Hotkey für Button

[irrerelb]

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:

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;

oben in mein Programm geschrieben, wie es das Tutorial zeigt. Und dann soll ich eine neue Prozedur machen, die wie folgt lautet:

Delphi-Quellcode:

procedure TForm1.WmHotkey(var Msg: TMessage);
begin
  if (Msg.WParam = 1) then
  begin
    // Hier auszuführenden Code einfügen
  end;
end;

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?
Wäre dankbar für jede Hilfe!
Vielen Dank im Voraus!
greez irrerelb