cerrar form, desde otro form

[ecfisa]

Hola sawesotj.

Empezado por sawesotj

tengo un proyecto en el cual inicio con una forma para hacer login llamada flogin, luego despues de validar credenciales llama a otra form llamada fmenu, la cual asu vez manda llamar a mas formas dependiendo de la seleccion en el menu, ...

Podrías hacer,

Código Delphi [-]
program Project1; 
...
uses
  Forms,
  Controls,
  ...;
begin
  Application.Initialize;
  Application.CreateForm(TfrmMenu, frmMenu);   // frmMenu es el principal
  Application.ShowMainForm:= False;            // no mostrar al iniciar
  Application.CreateForm(TfrmLogin, frmLogin); //  crear form login
  if frmLogin.ShowModal = mrOk then            // ¿ todo ok ?
  begin
    Application.ShowMainForm:= True;           // mostrar al iniciar
    Application.Run;                           // ejecutar
  end;
end.

Y como ejemplo, en el formulario de validación algo como:

Código Delphi [-]
...
procedure TfrmLogin.btnValidarClick(Sender: TObject);
begin
  if EditPwd.Text = 'password' then
    ModalResult:= mrOk
  else
    ModalResult:= mrAbort;
end;

Saludos