paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-16 21:09:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: fix imposibility to restore minimized window when ide restarts. issue #19769

Browse Source 
git-svn-id: trunk@35583 -
This commit is contained in:
zeljko 2012-02-24 15:34:45 +00:00
parent 76c83056e6
commit 233090854b
1 changed files with 11 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
ideintf/idewindowintf.pas
View File

@ -1626,10 +1626,18 @@ begin
begin
if (csDesigning in AForm.ComponentState) and (AForm.Designer <> nil) then
ARestoreVisible := AForm.Visible;
AForm.Visible:=true;
if BringToFront and (AForm.WindowState in [wsMinimized]) then
AForm.WindowState := wsNormal;
AForm.Visible := True;
if (AForm.WindowState in [wsMinimized]) then
begin
if BringToFront then
begin
// issue #19769
if AForm.Visible and not (fsModal in AForm.FormState) then
AForm.Visible := False;
AForm.ShowOnTop;
end;
end;
if (csDesigning in AForm.ComponentState) and (AForm.Designer <> nil) then
AForm.Visible := ARestoreVisible;