Do not flag clicks on system menu items other than our own "Check for updates" and "About" items as *handled* . Broken in r2580. Fixes issue #1309

This commit is contained in:
Ansgar Becker
2009-08-19 18:07:58 +00:00
parent 8e57faf265
commit b264ab16f3

View File

@ -9446,11 +9446,12 @@ procedure TMainForm.OnMessageHandler(var Msg: TMsg; var Handled: Boolean);
begin
// Clicks on system window menu get handled here
if Msg.message = WM_SYSCOMMAND then begin
Handled := True;
case Msg.wParam of
MSG_UPDATECHECK: Mainform.actUpdateCheck.Execute;
MSG_ABOUT: Mainform.actAboutBox.Execute;
else Handled := False;
end;
Handled := True;
end;
end;