Hola LAFALOFO
Para terminar y erriquecer un poco la explicacion de mi maestro Dec. con su permiso y sabiendo que se te presento esta duda antes solo queria darte estos codigos de mensajes que se, te cuestan un poco, para que los puedas usar en otra ocasion.
Si, No Cancela
Código Delphi
[-]
if MessageBox(Handle,
PChar('Mensaje'),
PChar('Título'),
MB_YESNOCANCEL + MB_DEFBUTTON1 + MB_APPLMODAL) = IDYES then
begin
end;
reintentar, cancelar
Código Delphi
[-]
if MessageBox(Handle,
PChar('Mensaje'),
PChar('Título'),
MB_RETRYCANCEL + MB_DEFBUTTON1 + MB_APPLMODAL) = IDRETRY then
begin
end;
Anular, reintentar, omitir
Código Delphi
[-]
if MessageBox(Handle,
PChar('Mensaje'),
PChar('Título'),
MB_ABORTRETRYIGNORE + MB_DEFBUTTON1 + MB_APPLMODAL) = IDRETRY then
begin
end;
Se que esto es sencillo pero lo pongo puesto que tanto tu como a otro le podria servir en algun momento.
Saludos y suerte