mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-22 18:19:23 +02:00
win32: fix restoring of main form state after application minimize (bug #0013752)
git-svn-id: trunk@20081 -
This commit is contained in:
parent
656d65cb06
commit
ff4795ef8e
@ -895,7 +895,7 @@ var
|
|||||||
if (Application.MainForm <> nil) and Application.MainForm.HandleAllocated then
|
if (Application.MainForm <> nil) and Application.MainForm.HandleAllocated then
|
||||||
begin
|
begin
|
||||||
if Application.MainForm.HandleObjectShouldBeVisible then
|
if Application.MainForm.HandleObjectShouldBeVisible then
|
||||||
Windows.ShowWindow(Application.MainForm.Handle, SW_SHOWNOACTIVATE);
|
Windows.ShowWindow(Application.MainForm.Handle, SW_SHOWNA);
|
||||||
end;
|
end;
|
||||||
Application.IntfAppRestore;
|
Application.IntfAppRestore;
|
||||||
end;
|
end;
|
||||||
|
Loading…
Reference in New Issue
Block a user