Exibindo MensageBox Delphi7

MessageBox em Delphi7.

Nesse tutorial vamos aprender a criar uma MessageBox com ação no Delphi.

1°- Adicione o componente "Button" na aba "Standard".
2°- Dê um duplo clique no Button e digite!

 if Application.MessageBox('Deseja cancelar o processo?',
      'Confirmação' {<=TITULO},mb_iconQuestion {<=DEFINE ICONE} + mb_YesNo {<=DEFINE BOTOES}) = mrYes then
       begin
      Application.Terminate; //encerra o programa
      end;