There is an event you could capture, it is called WM_GetMinMaxInfo.

Not sure if it will stop it in the method you want, but well worth a look.


The WM_GETMINMAXINFO message is sent to a window when the size or position of the 
window is about to change. An application can use this message to override the 
window's default maximized size and position, or its default minimum or maximum 
tracking size. 

WM_GETMINMAXINFO  
lpmmi = (LPMINMAXINFO) lParam; // address of structure 
 

Parameters

lpmmi

Value of lParam. Points to a MINMAXINFO structure that contains the default maximized 
position and dimensions, and the default minimum and maximum tracking sizes. An 
application can override the defaults by setting the members of this structure. 

 

Return Values

If an application processes this message, it should return zero. 

Remarks

The maximum tracking size is the largest window size that can be produced by using the 
borders to size the window. The minimum tracking size is the smallest window size that 
can be produced by using the borders to size the window. 

Christopher Crowe (Software Developer)
Microsoft MVP, MCP

Adrock Software
Byte Computer & Software LTD
P.O Box 13-155 
Christchurch
New Zealand
Phone/Fax (NZ) 03-3651-112


> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On
> Behalf Of [EMAIL PROTECTED]
> Sent: Friday, 30 April 1999 00:02
> To: Multiple recipients of list delphi
> Subject: [DUG]: stopping minimize of app
> 
> 
>  I have to following code to stop my application from being 
> minimized.  This  works fine for everything except the show 
> desktop feature that win98 has. Any ideas on how to stop this 
> without removing the icon?  procedure TMain.FormCreate(Sender: 
> TObject); begin      Application.OnMinimize := Restoreform; end;  
> Procedure Tmain.restoreform(Sender : TObject); Begin        
> Application.Restore; End;  James
> 
> -----------------------------------------------------
> This mail sent through IMP: http://web.horde.org/imp/
> ------------------------------------------------------------------
> ---------
>     New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
>                   Website: http://www.delphi.org.nz
> 

---------------------------------------------------------------------------
    New Zealand Delphi Users group - Delphi List - [EMAIL PROTECTED]
                  Website: http://www.delphi.org.nz

Reply via email to