[delphi-br] Re: Cancel - MessageBox

2005-01-29 Por tôpico Bruno Augusto
Acredito que não faça sentido existir o botão cancelar... pois se vc não insere evento no mesmo o messagebox fecha e nada acontece... se vc colocar um evento de cancelamento de edição, ou inserção pode tb.. mas o mesmo não serviria no botão NÃO? de todo jeito para pegar qual botão que foi

RES: [delphi-br] Re: Cancel - MessageBox

2005-01-29 Por tôpico Alessandro Fernandes
:[EMAIL PROTECTED] Enviada em: sexta-feira, 28 de janeiro de 2005 01:42 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Re: Cancel - MessageBox Acredito que não faça sentido existir o botão cancelar... pois se vc não insere evento no mesmo o messagebox fecha e nada acontece... se vc colocar

[delphi-br] Re: Cancel - MessageBox

2005-01-28 Por tôpico Roberto Dill
Olá, eu faria assim: procedure TForm1.Button1Click(Sender: TObject); var res : Integer; begin // usando api res:=Application.MessageBox(PChar('Ação desejada'),PChar ('Aviso'),MB_YESNOCANCEL); if res = IDYES then begin ShowMessage('selecionou sim'); end else if res = IDNO