Invoke (selector)
<source lang='delphi'>function Invoke(iCursorMode:TCursorMode; const iMethodName:string; iArgs:Array of variant):Integer;</source>
Cette fonction invoque la méthode iMethodName de la classe du sélecteur pour chaque objet de la sélection.
| Result | Le nombre d'objet sur lesquels la méthode a été exécuté. |
| iCursorMode | Le mode d'exécution du curseur. |
| iMethodName | Méthode de la classe du sélecteur |
| iArgs | Tableau des arguments à passer à la méthode |
Exemple :
<source lang='delphi'>
Procedure WFClasseA.Populate(ls:TStringList); begin
ls.Add(unCode);
end
procedure TestSelector.TestInvoke; var sel:TSelector; S,SS:string; stag:string; ls:TStringList; begin
sel := WFClasseA.CreateSelector(,,true,[]);
ls := TStringList.Create; sel.Invoke(ocSelect, 'Populate', [ls]);
S := ; stag := ;
foreach SS in ls do
begin
S := S+stag+SS;
stag := ',';
end;
ShowMessage(S);
end; </source>
|
Tip : Dans cet exemple la transaction est géré par la sélection. |
<source lang='delphi'>
Procedure WFClasseA.Increment(aValue:Integer); begin
unEntier := unEntier+aValue;
end
procedure TestSelector.TestInvoke; var sel:TSelector; begin
sel := WFClasseA.CreateSelector(,,true,[]); sel.Invoke(ocManageTran, 'Increment', [10]);
end; </source>
Voir aussi :
{{#if:Selecteur (tech)|
{{#if:Selecteur (tech)|— Selecteur (tech) |}} — Développement DSM —
|
{{#if:|— [[{{{1}}}]] |}} — Développement DSM —
}}