Código Delphi [-]unit Unit2; interface uses Forms, Windows; Procedure muestra(); implementation Procedure Muestra(); begin Application.MessageBox('¿Seguro que desea abandonar?','Atención',mb_OkCancel + mb_IconQuestion); end;
unit Unit2; interface uses Forms, Windows; Procedure muestra(); implementation Procedure Muestra(); begin Application.MessageBox('¿Seguro que desea abandonar?','Atención',mb_OkCancel + mb_IconQuestion); end;