Application - Manter minimizado ao abrir |
Top Previous Next |
1. You must set WindowState to wsMinimized in the form's properties.
2. In the private section of the form object's declaration, put:
PROCEDURE WMQueryOpen(VAR Msg : TWMQueryOpen); message WM_QUERYOPEN;
3. In the implementation section, put this method:
PROCEDURE TForm1.WMQueryOpen(VAR Msg : TWMQueryOpen); begin Msg.Result := 0; end; |