Hallo,

ich habe auf meiner Hauptform eine ActionList hinzugefügt und dieser den Shortcut 'CTRL+SHIFT+A' gegeben. OnExecute sieht wie folgt aus:

zusammenfalten · markieren

Delphi-Quellcode:

procedure Tmain.strg_shift_aExecute(Sender: TObject);
begin
  if main.Visible then
    begin
      main.Hide;
    end else
    begin
      main.Show;
      main.BringToFront;
      Application.BringToFront;
    end;
end;

Wenn die Hauptform also sichtbar ist, soll sie unsichtbar werden, ansonsten wieder sichtbar werden. Diese Aktion habe ich auch auf einem TrayIcon und klappt wunderbar per Mausklick, allerdings mit dem Shortcut kann ich das Fenster nur hiden, es wird beim zweiten Drücken aber nicht wieder sichtbar.

Wie kann ich es machen, dass der Shortcut auch aktiv bleibt, wenn die Hauptform unsichtbar ist?

Dazu brauchst du einen systemweiten Hotkey, da dein fenster den Eingabefocus nicht mehr hat, wenn es nicht aktiv ist. Es kann also auf deine Tastendrücke nicht reagieren.

Zitat von Luckie:

Dazu brauchst du einen systemweiten Hotkey, da dein fenster den Eingabefocus nicht mehr hat, wenn es nicht aktiv ist. Es kann also auf deine Tastendrücke nicht reagieren.

Hehe, das dachte ich mir auch schon, aber wie lässt sich sowas bewerkstelligen?

RegisterHotkey()

Zitat von DeddyH:

RegisterHotkey()

Ah das ist mal ein Hinweis. Dann werd ich mal schauen.