Fechar Formulário

Delphi

09/11/2006

Onde coloco no formulario um aviso para usuario que fechar o formulario usando o X no canto superior direito? Pois no menu da aplicação ja tenho uma opção sair que quando o usuário clica em sair dá a mensagem se quer realmente sair do sistema.


Leufmt

Leufmt

Curtidas 0

Respostas

Marcio.theis

Marcio.theis

09/11/2006

Somente um hint sobre o botão com X não iria servir ? Ou vc precisa que seja algo que apareça mais ?


GOSTEI 0
Leufmt

Leufmt

09/11/2006

TEM QUE SER ALGO ASSIM:

var
Confirma: Integer;
begin
Confirma := Application.MessageBox(´Deseja mesmo finalizar o sistema ?´,
´MENSAGEM!´, mb_YesNo+mb_DefButton2+mb_IconQuestion);
If Confirma <> Idyes then
Abort
Else
Close;


GOSTEI 0
POSTAR