TManufacturingProductionItem.Unit
| TManufacturingProductionItem = class (TObject) | Interface de TManufacturingProductionItem | Exemples de TManufacturingProductionItem |
Unité de la quantité produite.
Syntaxe
property Unit: String read GetUnit
Remarques
L'unité est en lecture car elle est la même que l'unité de l'article de la gamme.
Cette propriété est dépréciée à partir de la version Qubes 6.6 au profit de la propriété DisplayUnit qui elle renvoi l'unité de saisie.
Exemples
var gammeCroissant: TManufacturing;
var gammeSubOperation: TManufacturingSubOperation;
var gammeProductionItem: TManufacturingProductionItem;
var unite: TUnit;
unite:=TUnit.create;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
gammeProductionItem:=gammeSubOperation.GetManufacturingProductionItem(0);
unite.ConnectByAbbrev(gammeProductionItem.Unit);
InformationDlg(unite.name);
finally
gammeCroissant.free;
unite.free;
end;
// Connexion à la gamme 'gammeCroissant' et affichage de l'unité de production.
var gammeSubOperation: TManufacturingSubOperation;
var gammeProductionItem: TManufacturingProductionItem;
var unite: TUnit;
unite:=TUnit.create;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
gammeProductionItem:=gammeSubOperation.GetManufacturingProductionItem(0);
unite.ConnectByAbbrev(gammeProductionItem.Unit);
InformationDlg(unite.name);
finally
gammeCroissant.free;
unite.free;
end;
// Connexion à la gamme 'gammeCroissant' et affichage de l'unité de production.