Start App With Hidden Main Form

[Marion]

I need to have my app start with the main form hidden until the user double clicks on the sys tray icon. How do I do that?

[tomek]

http://lazarus.freepascal.org/index.php/topic,12870.msg66721.html

[Marion]

http://lazarus.freepascal.org/index.php/topic,12870.msg66721.html

Thank you for the link. Unfortunately, this doesn't work.

1. I already have Form.Visible := False;
2. Adding the Form.Hide in the OnShow event makes it impossible for the user to display the form when they double click the sys tray icon.

Is there anything else?

[tomek]

Thank you for the link. Unfortunately, this doesn't work.

1. I already have Form.Visible := False;
2. Adding the Form.Hide in the OnShow event makes it impossible for the user to display the form when they double click the sys tray icon.

Is there anything else?

I don't know how should behave OnShow, maybe it's a bug.
On Windows you can try this:

Code: [Select]

procedure TForm1.TrayIcon1Click(Sender: TObject);
begin
  ShowWindow(Application.MainFormHandle,SW_SHOW);
end;and add windows to uses section in that case.
If you have more forms then replace MainFormHandle with handle to your form.

[User137]

Open project source, and add line:

Code: [Select]

  Application.Initialize;
  Application.ShowMainForm := False; // Add this line, so mainform will not show at startup
  Application.CreateForm(TfrmMain, frmMain);

[tomek]

Yep, adding the Form.Hide in the OnShow event causes the problems, as the User137 writes use Application.ShowMainForm or Hide form when it's already visible.

[Marion]

Thank you that got it!

Much appreciated.