Duvida com MessageBox

Delphi

05/06/2004

Olá, estou usando
 if Application.MessageBox(´Este registro foi modificado, deseja salvar as alterações ?´, ´Aplicacao´, MB_YESNOCANCEL + MB_ICONQUESTION + MB_DEFBUTTON1 + MB_APPLMODAL) = ID_YES then


ele me retorna os botoes Sim, Nao, Cancelar... consegui verificar se foi o Sim.. mas como fazer pra verificar se foi o Cancelar?

Desde j agradeco?


Titanius

Titanius

Curtidas 0

Respostas

Fabio.hc

Fabio.hc

05/06/2004

[b:58eadd7553]ID_CANCEL[/b:58eadd7553]

if Application.MessageBox(´Este registro foi modificado, deseja salvar as alterações ?´, ´Aplicacao´, MB_YESNOCANCEL + MB_ICONQUESTION + MB_DEFBUTTON1 + MB_APPLMODAL) = ID_CANCEL then



GOSTEI 0
Aroldo Zanela

Aroldo Zanela

05/06/2004

Colega,

Veja o exemplo:

var OpcaoSelecionada: Byte;
begin
OpcaoSelecionada := Application.MessageBox(´Este registro foi modificado, deseja salvar as alterações ?´, ´Aplicacao´, MB_YESNOCANCEL + MB_ICONQUESTION + MB_DEFBUTTON1 + MB_APPLMODAL);
  Case OpcaoSelecionada of
  ID_YES: ShowMessage(´Sim´);
    ID_NO: ShowMessage(´Não´);
    ID_CANCEL: ShowMessage(´Cancelar´);
end;
end;



GOSTEI 0
Titanius

Titanius

05/06/2004

Valeu Aroldo, funcionou direitinho...

[]s


GOSTEI 0
POSTAR