¿Cómo evitar que al cerrar el formulario principal se cierren los demás?

[Master23]

Tengo un problema necesito su ayuda,el problema es que tengo una aplicación realizada y bueno sistema de entrada o login ,es el principal form pero si lo cierro entonces se cierran todos y si lo pongo hide cuando minimizo las otras ventanas se desaparecen de la barra pero aun siguen ahí ,tengo que terminar la aplicación por el administrador de tareas porque solo aparecen ahí ,y si es invisible también las demás aplicaciones desaparecen cuando la minimizo, quiero que el formulario principal desaparezca y que yo pueda minimizar las demás aplicaciones sin que desaparezcan las demás al minimizar ,gracias de ante mano.

[kiozo]

solo tienes que liberar la forma ...! despues de entrar a otra..!

Código Delphi [-]
formaprincipal.free;

[Master23]

Empezado por kiozo

solo tienes que liberar la forma ...! despues de entrar a otra..!

Código Delphi [-]
formaprincipal.free;

podrías darme un ejemplo por favor.

[kiozo]

Empezado por Master23

podrías darme un ejemplo por favor.

mira mi forma principal se llama TFAcceso que es el login del usuario cuando hago el locate..!

si es verdadero entro a la forma menu y libero mi forma principal que es tfacceso.

Código Delphi [-]
procedure TFAcceso.BitBtn1Click(Sender: TObject);
begin

 Modulo.TUsuario.open;
if (Edit1.Text<>'')then
  begin
    if Modulo.TUsuario.Locate('usuario;contraseña', VarArrayOf([Edit1.Text, Edit2.Text]), []) then
      begin
        Application.CreateForm(TFMenu,FMenu);
        FMenu.Show;
        facceso.Free;
      end
    else
  begin
        ShowMessage('Usuario y/o Contraseña Incorrecta');
        Edit1.setFocus;
        Edit2.Clear;
        end;
        Modulo.TUsuario.close;
        end;
end;

[Master23]

Empezado por kiozo

mira mi forma principal se llama TFAcceso que es el login del usuario cuando hago el locate..!

si es verdadero entro a la forma menu y libero mi forma principal que es tfacceso.

Código Delphi [-]
procedure TFAcceso.BitBtn1Click(Sender: TObject);
begin

 Modulo.TUsuario.open;
if (Edit1.Text<>'')then
  begin
    if Modulo.TUsuario.Locate('usuario;contraseña', VarArrayOf([Edit1.Text, Edit2.Text]), []) then
      begin
        Application.CreateForm(TFMenu,FMenu);
        FMenu.Show;
        facceso.Free;
      end
    else
  begin
        ShowMessage('Usuario y/o Contraseña Incorrecta');
        Edit1.setFocus;
        Edit2.Clear;
        end;
        Modulo.TUsuario.close;
        end;
end;

Muchas gracias seguiré tu consejo.

[[coso]]

Hola, en vez de free, mejor usa release, ya que si usas free estaras liberando el form mientras se esta usando, lo que te provocara problemas. Un saludo.