TManufacturingProductionItem.QuantityTolerance
redirigé depuis TManufacturingProductionItem.SetQuantityTolerance
| TManufacturingProductionItem = class (TObject) | Interface de TManufacturingProductionItem | Exemples de TManufacturingProductionItem |
Tolérance sur la quantité produite.
Syntaxe
property QuantityTolerance: Float read GetQuantityTolerance write SetQuantityTolerance
Remarques
Renvoie la quantité de la tolérance de l'élément de production en unité de gestion de l'article.
Attention : avant la version 6.6, elle était renvoyée dans l'unité utilisée dans l'élément de production.
Exemples
var gammeCroissant: TManufacturing;
var gammeSubOperation: TManufacturingSubOperation;
var gammeProductionItem: TManufacturingProductionItem;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
gammeProductionItem:=gammeSubOperation.GetManufacturingProductionItem(0);
gammeProductionItem.QuantityTolerance:='0.1';
gammeCroissant.post;
finally
gammeCroissant.free;
end;
var gammeSubOperation: TManufacturingSubOperation;
var gammeProductionItem: TManufacturingProductionItem;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
gammeProductionItem:=gammeSubOperation.GetManufacturingProductionItem(0);
gammeProductionItem.QuantityTolerance:='0.1';
gammeCroissant.post;
finally
gammeCroissant.free;
end;
var gammeCroissant: TManufacturing;
var gammeSubOperation: TManufacturingSubOperation;
var gammeProductionItem: TManufacturingProductionItem;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
gammeProductionItem:=gammeSubOperation.GetManufacturingProductionItem(0);
InformationDlg(FloatToStr(gammeProductionItem.QuantityTolerance));
finally
gammeCroissant.free;
end;
var gammeSubOperation: TManufacturingSubOperation;
var gammeProductionItem: TManufacturingProductionItem;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
gammeProductionItem:=gammeSubOperation.GetManufacturingProductionItem(0);
InformationDlg(FloatToStr(gammeProductionItem.QuantityTolerance));
finally
gammeCroissant.free;
end;