Tohle spouštíš 3?Application.CreateForm(Tzarizeni1,zarizeni1);
zarizeni1.Show;
Dlouho jsem Delphi neviděl a divim se, že to nezborazí jednou, každopádně pokud 3 formy, pak by to mělo být pole formu, ne?
Application.CreateForm(Tzarizeni1,zarizeni1[1]);
zarizeni1[1].Show;
Application.CreateForm(Tzarizeni1,zarizeni1[2]);
zarizeni1[2].Show;
..