Fórum X - Fechar. #308343

09/01/2006

0

Boas Pessoal.

Gostava de saber como consigo colocar o cod de sair no X do canto superior direito.

Obrigado. :roll:


Rui Lisboa

Rui Lisboa

Responder

Posts

09/01/2006

Michael

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


Responder

Gostei + 0

09/01/2006

Redoctober

Action := CaNone;

if Messagebox(0,´Deseja finalizar o aplicativo?´,´Atenção´,4+32+8192)= 6 then
  begin 
    Application.Terminate;
  end;



Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar