Como saber se um Form foi fechado

Delphi

09/06/2004

Senhores
Tenho a seguinte situação. Um form chama outro form e este outro pede algumas informações e apresenta alguns botões para executar algumas funçoes. Entretanto o usario pode não querer executar estas funções e fechar o form usando o botão padrão se saída X.
A minha dúvida é: Como, no form que chamou o formulário, saber se o formulário chamado foi fechado por opção do usuário.

saudações
Rounilo


Rounilo

Rounilo

Curtidas 0

Respostas

Aroldo Zanela

Aroldo Zanela

09/06/2004

Colega,

Por favor, detalhe melhor sua dúvida. A princípio, imagino que poderia resolver no manipulador de evento OnCloseQuery.


GOSTEI 0
Rounilo

Rounilo

09/06/2004

Tentando ser mais claro coloco abaixo as linhas de código.

procedure TmenuPrin.VisualizarumaDAM1Click(Sender: TObject);
begin
INDOPER:= ´1´;
FrmNumDAM.Caption:=´aaaaaaaaaaaaaaa´;
FrmNumDam.Showmodal;
FrmNumDam.Close;
**** aqui esta o meu problema *****
preciso saber se o usuário, não querendo dar continuidade,
fechou a tela.

Atualmente, como não estou testando nada o FrmShowDam será
executado gerando um erro por necessitar de um dado do form
anterior.
*****************************

FrmShowDam.Left:=18;
FrmShowDam.Top:=75;
FrmShowDam.Height:=468;
FrmShowDam.Width:=771;

FrmShowDam.Showmodal;
end;

Espero ter esclarecido


GOSTEI 0
Aroldo Zanela

Aroldo Zanela

09/06/2004

Colega,

Veja se é isto que precisa:

var Retorno: Integer;
begin
  Application.CreateForm(TForm2, Form2);
  Retorno := Form2.ShowModal;
  Case Retorno of
    mrCancel: ShowMessage(´Cancelado´);
    mrOk: ShowMessage(´Ok´);
    mrAbort: ShowMessage(´Abortado´);
  end;
  Form2.Release;
  FreeAndNil(Form2);
end;



GOSTEI 0
POSTAR