TManufacturingSubOperation.RemoveManufacturingStandardControlItem
| TManufacturingSubOperation = class (TObject) | Interface de TManufacturingSubOperation | Exemples de TManufacturingSubOperation |
Description de RemoveManufacturingStandardControlItem
Syntaxe
procedure RemoveManufacturingStandardControlItem(manufacturingStandardControlItem: TManufacturingStandardControlItem)
manufacturingStandardControlItem:
Remarques
Exemples
var gammeCroissant: TManufacturing;
var gammeSubOperation: TManufacturingSubOperation;
var gammeStandardControlItem: TManufacturingStandardControlItem;
var i: integer;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
for i:=0 to gammeSubOperation.CountManufacturingStandardControlItem-1 do begin
gammeStandardControlItem:=gammeSubOperation.GetManufacturingStandardControlItem(i);
gammeSubOperation.RemoveManufacturingStandardControlItem(gammeStandardControlItem);
end;
gammeCroissant.post;
finally
gammeCroissant.free;
end;
var gammeSubOperation: TManufacturingSubOperation;
var gammeStandardControlItem: TManufacturingStandardControlItem;
var i: integer;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
for i:=0 to gammeSubOperation.CountManufacturingStandardControlItem-1 do begin
gammeStandardControlItem:=gammeSubOperation.GetManufacturingStandardControlItem(i);
gammeSubOperation.RemoveManufacturingStandardControlItem(gammeStandardControlItem);
end;
gammeCroissant.post;
finally
gammeCroissant.free;
end;