paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-06-27 14:48:31 +02:00
Code Issues Packages Projects Releases Wiki Activity

showwindow does not send WM_SHOWWINDOW message after maximized window creation (patch from jesus)

Browse Source 
git-svn-id: trunk@7098 -
This commit is contained in:
micha 2005-04-22 10:48:42 +00:00
parent 6e7fb28537
commit 712c2c41f3
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lcl/interfaces/win32/win32object.inc
View File

@ -676,6 +676,10 @@ Begin
wsMinimized: Flags := SW_SHOWMINIMIZED; wsMinimized: Flags := SW_SHOWMINIMIZED;
end; end;
Windows.ShowWindow(Handle, Flags); Windows.ShowWindow(Handle, Flags);
{ ShowWindow does not send WM_SHOWWINDOW when creating overlapped maximized window }
{ TODO: multiple WM_SHOWWINDOW when maximizing after initial show? }
if Flags = SW_SHOWMAXIMIZED then
Windows.SendMessage(Handle, WM_SHOWWINDOW, 1, 0);
end; end;
If (Sender Is TCustomForm) Then If (Sender Is TCustomForm) Then
SetClassLong(Handle, GCL_HICON, LONG(TCustomForm(Sender).GetIconHandle)); SetClassLong(Handle, GCL_HICON, LONG(TCustomForm(Sender).GetIconHandle));
@ -737,6 +741,9 @@ end;
{ {
$Log$ $Log$
Revision 1.309 2005/04/22 10:48:42 micha
showwindow does not send WM_SHOWWINDOW message after maximized window creation (patch from jesus)
Revision 1.308 2005/03/03 13:13:51 vincents Revision 1.308 2005/03/03 13:13:51 vincents
fixed thread synchronize support for fpc 1.9.9 using WakeMainThread fixed thread synchronize support for fpc 1.9.9 using WakeMainThread