TManufacturingProductionItem.ToleranceMode

TManufacturingProductionItem = class (TObject)

Interface de TManufacturingProductionItem

Exemples de TManufacturingProductionItem

Type de tolérance sur la quantité produite.

Syntaxe

property ToleranceMode: TManufacturingToleranceMode read GetToleranceMode write SetToleranceMode

Remarques

Non renseigné

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.ToleranceMode:=mtmAbsolute;
gammeCroissant.post;
finally
gammeCroissant.free;
end;

// Connexion à la gamme 'gammeCroissant' et modification du type de tolérance.

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);
case gammeProductionItem.AutoSelectBatch of
mtmAbsolute: InformationDlg('Tolérance Absolue.');
mtmRelative:InformationDlg('Tolérance Relative.');
end;
finally
gammeCroissant.free;
end;

// Connexion à la gamme 'gammeCroissant' et affichage du type de tolérance.

Classification

QuBESGamme TManufacturingProductionItem