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 la classe du sélecteur
iArgs	Tableau des arguments à passer à la méthode

Exemple :

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>

<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>

Voir aussi :

• Mode d'exécution d'un curseur

{{#if:Selecteur (tech)|

{{#if:Selecteur (tech)|— Selecteur (tech) |}} — Développement DSM —

|

{{#if:|— [[{{{1}}}]] |}} — Développement DSM —

}}