Hallo,
mal ins Dunkle getippt:
Delphi-Quellcode:
FoMain := TFoMain.Create(self);
FoMain.FormStyle := fsNormal; // weils noch nicht sichtbar ist, nur erstellt <> sichtbar?
FoMain.Visible := False; // weils unsichtbar gemacht wird.
FoMain.ShowModal; // weils angezeigt wird.
Alternativ:
Delphi-Quellcode:
FoMain := TFoMain.Create(self); // macht auch sichtbar (abhängig von den Defaultwerten für FormStyle, Visible...
// Eventuell hat ja auch ein OnCreate-Ereignis noch irgendwelche Auswirkungen.
FoMain.FormStyle := fsNormal; // weil seine Darstellungsform geändert wird.
FoMain.Visible := False;
FoMain.ShowModal; // weils angezeigt wird.
Jedes mal ändert sich die Sichtbarkeit.
Mach mal ShowMessages dazwischen und schau, in welcher Reihenfolge Deine Befehle und die Aufrufe von FormShow erfolgen oder schau's Dir mit dem Debugger an, dann müsstest Du erkennen können, welcher Deiner Befehle ein FormShow verursacht.