Windows API (94)
Windows Filesystem (41)
Windows Forms (69)
Windows Graphics (38)
Exchange Links
About this site
How to intercept the maximize command
This article has not been rated yet. After reading, feel free to leave comments and rate it.
If you want to restrict your window's maximum size (or minimum size, for that matter), you may try to intercept WM_SYSCOMMAND and check for the value of wParam.
More elegant is to intercept WM_GETMINMAXINFO, as the following example shows:
 |  | |
type
TMyForm = class(TForm)
procedure _WM_GETMINMAXINFO( var mmInfo : TWMGETMINMAXINFO ); message wm_GetMinMaxInfo;
end;
//..
procedure TMyForm._WM_GETMINMAXINFO( var mmInfo : TWMGETMINMAXINFO );
begin
with mmInfo.minmaxinfo^ do
begin
// allow at most half of the screen, and position it in the middle
ptmaxposition.x := Screen.Width div 4;
ptmaxposition.y := Screen.Height div 4;
ptmaxsize.x := Screen.Width div 2;
ptmaxsize.y := Screen.Height div 2;
end;
end;
end. | ||
 |  |
|
||||||||
Comments: