TManufacturingSubOperation.DeleteParameterByName
| TManufacturingSubOperation = class (TObject) | Interface de TManufacturingSubOperation | Exemples de TManufacturingSubOperation |
Suppression d'un paramètre de la sous-opération par son nom.
Syntaxe
procedure DeleteParameterByName(paramName: String)
paramName: nom du paramètre.
Remarques
Exemples
var gammeCroissant: TManufacturing;
var gammeSubOperation: TManufacturingSubOperation;
var listParameters: TStrings;
var i: integer;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
listParameters:=TStrings.Create;
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
gammeSubOperation.CollectParameterNames(listParameters);
for i:=0 to listParameters.count-1 do
gammeSubOperation.DeleteParameterByName(listParameters.strings[i]);
gammeCroissant.post;
finally
listParameters.free;
gammeCroissant.free;
end;
var gammeSubOperation: TManufacturingSubOperation;
var listParameters: TStrings;
var i: integer;
gammeCroissant:=TManufacturing.ConnectByGPAOID('gammeCroissant v0.00');
listParameters:=TStrings.Create;
try
gammeSubOperation:=gammeCroissant.GetOperationByNumber(10).GetManufacturingSubOperation(0);
gammeSubOperation.CollectParameterNames(listParameters);
for i:=0 to listParameters.count-1 do
gammeSubOperation.DeleteParameterByName(listParameters.strings[i]);
gammeCroissant.post;
finally
listParameters.free;
gammeCroissant.free;
end;