de esta manera llamo a una ventana despues de ejecutarse la pantalla principal.
Código Delphi
[-] Catalogo_Empresas := TCatalogo_Empresas.Create(self);
try
Catalogo_Empresas.ShowModal;
finally
Catalogo_Empresas.Free;
Boton_VerAvisos.SetFocus;
end;
y al finalizar el proceso de esta se cierra de esta manera
La Pantalla principal tiene estas caracteristicas
WindowState = wsNormal
FormStile = fsNormal
Para la pantalla de catalogo de empresas es
WindowState = wsNormal
FormStile = fsNormal
Realice prueba por separado y funciona normalmente.