Révision 10 UnitIngredientCreation.pas
UnitIngredientCreation.pas | ||
---|---|---|
293 | 293 |
Sucres := InputProximal(ValidateEditSucres.AsFloat, RapMS, ComboBoxSucres.ItemIndex div 2, ComboBoxSucres.ItemIndex mod 2) |
294 | 294 |
else |
295 | 295 |
Sucres := 0; |
296 |
if MM + MAT + MG + Fibre + Amidon + Sucres > 1.05
|
|
296 |
if MM + MAT + MG + Fibre + Amidon + Sucres > MAX_SUM
|
|
297 | 297 |
then |
298 | 298 |
if MessageDlg(_('The sum of nutrients is estimated to more than 100% of the dry matter.' + sLineBreak + 'Are you sure you want to continue?'), mtError, [mbYes, mbNo], 0) <> mrYes |
299 | 299 |
then |
Formats disponibles : Unified diff