Form

20/05/2003

2

Como faço para sabe, ao fechar o form pelo botão x da janela, que estou fechado este form..

Por exemplo no evento OnClose eu quero por:
Se form x então
faça x coisa
Se form y então
faça y coisa
....

OBS.: O Tform eh o mesmo para todos, ele eh chamado várias vezes mas cada um com dados diferente.


Responder

Posts

20/05/2003

Lfernandos

Vc precisa fazer os teste no evento OnCloseQuery, abaixo um exemplo:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if (Sender is TForm1) then begin
CanClose := MessageDlg(´Deseja relmente sair?´, mtWarning, [mbYes, mbNo], 0) = IDYES;
end;
end;


Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar