Código Delphi [-] if Application.MessageBox(PChar(TextInformation), PChar(DialogTitle), MB_YESNO + MB_ICONQUESTION + MB_DEFBUTTON2) = IDYES then begin //Tu código end;
if Application.MessageBox(PChar(TextInformation), PChar(DialogTitle), MB_YESNO + MB_ICONQUESTION + MB_DEFBUTTON2) = IDYES then begin //Tu código end;