Hallo,
ich habe auf meiner Hauptform eine ActionList hinzugefügt und dieser den Shortcut 'CTRL+SHIFT+A' gegeben. OnExecute sieht wie folgt aus:
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?