TManufacturingProductionItem.LossPercentage
redirigé depuis TManufacturingProductionItem.GetLossPercentage
| TManufacturingProductionItem = class (TObject) | Interface de TManufacturingProductionItem | Exemples de TManufacturingProductionItem |
Pourcentage de déchet.
Syntaxe
property LossPercentage: Float read GetLossPercentage write SetLossPercentage
Remarques
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.LossPercentage:=0.2;
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.LossPercentage:=0.2;
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.LossPercentage));
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.LossPercentage));
finally
gammeCroissant.free;
end;