showmessage con si y no

[[eduarcol]]

Código Delphi [-]
if MessageDlg('¿Desea Procesar?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then
begin
   //Si desea procesar
end
else
begin
   //No desea procesar
end;

se me adelanto DEC