Set Application.MainFormOnTaskBar after MainForm.Startup has finished, so we get the application's handle on the task bar as long as MainForm is hidden. Fixes issue #2629.

This commit is contained in:
Ansgar Becker
2012-09-15 11:28:01 +00:00
parent 3d0ad5cab9
commit d87ece9287

View File

@ -55,11 +55,11 @@ begin
else begin else begin
Application.Initialize; Application.Initialize;
Application.Title := APPNAME; Application.Title := APPNAME;
Application.MainFormOnTaskBar := True;
Application.UpdateFormatSettings := False; Application.UpdateFormatSettings := False;
Application.CreateForm(TMainForm, MainForm); Application.CreateForm(TMainForm, MainForm);
Application.OnMessage := Mainform.OnMessageHandler; Application.OnMessage := Mainform.OnMessageHandler;
MainForm.Startup; MainForm.Startup;
Application.MainFormOnTaskBar := True;
Application.Run; Application.Run;
end; end;
end. end.