form message

[[seoane]]

Prueba asi:

Código Delphi [-]
case messagedlg('CANTIDAD INSUFICIENTE1nulo',mterror,[mbyes,mbcancel],0) of
  mbYes: 
    begin

    end;
  mbCancel:
    begin

    end;
end;