Ayuda con este código que me dejaron

[[Caral]]

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