X - Fechar.
Boas Pessoal.
Gostava de saber como consigo colocar o cod de sair no X do canto superior direito.
Obrigado. :roll:
Gostava de saber como consigo colocar o cod de sair no X do canto superior direito.
Obrigado. :roll:
Rui Lisboa
Curtidas 0
Respostas
Michael
09/01/2006
Não entendi muito bem, mas acredito que vc queria ser notificado quando o usuário fechar um form, correto? Se for isso, basta implementar o evento [b:70ed66fc3b]OnClose [/b:70ed66fc3b]da classe [b:70ed66fc3b]TForm.[/b:70ed66fc3b]
[]´s
[]´s
GOSTEI 0
Redoctober
09/01/2006
Action := CaNone; if Messagebox(0,´Deseja finalizar o aplicativo?´,´Atenção´,4+32+8192)= 6 then begin Application.Terminate; end;
GOSTEI 0