Mega Code Archive
Keeping an application minimized
<![CDATA[
Question:
How can I keep my application minimized as an icon?
Answer:
The following example demonstrates trapping the WM_QUERYOPEN
message to prevent the application from restoring from an
iconized state. Note that the Window state of the form must
be set to Minimized in the object inspector for this method
to work.
Example:
type
TForm1 = class(TForm)
private
{ Private declarations }
procedure WMQueryOpen(var Msg : TWMQueryOpen);
message WM_QUERYOPEN;
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.WMQueryOpen(var Msg : TWMQueryOpen);
begin
Msg.Result := 0;
end;
]]>