Oh, jetzt habe ich den Übeltäter, hatte das hier drin, das hat meine Shortcuts außerhalb der Form gefressen:
Delphi-Quellcode:
procedure TF_Main.ApplicationEvents1ShortCut(var Msg: TWMKey;
var Handled: Boolean);
begin
Handled := MainMenu.IsShortCut(Msg);
end;
So gehts wieder in anderen Formen:
Delphi-Quellcode:
procedure TF_Main.ApplicationEvents1ShortCut(var Msg: TWMKey;
var Handled: Boolean);
begin
if Self = Screen.ActiveForm then begin
Handled := MainMenu.IsShortCut(Msg);
end;
end;
Also Dank an Redeemer, Dein Hinweis hat mich darauf gebracht, an dieser Stelle zu suchen...