Révision 10 UnitIngredientEditionCopy.pas
| UnitIngredientEditionCopy.pas | ||
|---|---|---|
| 351 | 351 |
Sucres := InputProximal(ValidateEditSucres.AsFloat, RapMS, ProximalUnit div 2, ProximalUnit mod 2) |
| 352 | 352 |
else |
| 353 | 353 |
Sucres := ClientDataSetInraAfzSucres.Value; |
| 354 |
if MM + MAT + MG + Fibre + Amidon + Sucres > 1.05
|
|
| 354 |
if MM + MAT + MG + Fibre + Amidon + Sucres > MAX_SUM
|
|
| 355 | 355 |
then |
| 356 | 356 |
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
|
| 357 | 357 |
then |
Formats disponibles : Unified diff