Hallo,
ich möchte, dass das schließen aus dem Systemmenü abgefangen wird: "Fenster schließen Alt+F4". Ich habe es mit folgendem Code probiert, doch er fängt nur die Tastenkombination Alt+F4 ab und nicht den Klick auf den Item in dem Menü.
Delphi-Quellcode:
procedure WMSysCommand(var Message: TWMSysCommand); message WM_SYSCOMMAND;
procedure TForm1.WMSysCommand(var Message: TWMSysCommand);
begin
If Message.CmdType and $FFF0 = SC_CLOSE then Hide;
inherited;
end;
Dies funktioniert beim drücken von Alt-F4 und beim Klicken auf die Windows Schließen Schaltfläche rechts oben, jedoch nicht aus dem Menü heraus. Was kann ich machen, damit auch dies funktioniert?
Gruß
Mazel