Default enumerator (TStereotypeClassQueue)

<source lang='delphi'>class function :TQueueEnumerator;</source>

Les classes file d'attente supporte une méthode de classe par défaut renvoyant un énumérateur.

Result

Un type énumérateur

Tip : L'énumération est ordonnée suivant la valeur de queueID, un élément retourné est le suivant de l'élément précédent.

Tip : Cette syntaxe est équivalent à l'utilisation de Topic().

Exemple :

<source lang="delphi"> procedure MyClass.TestQueueEnumerator; var sel:TSelector; obj:MyQueue; inst:WFClasseA; S,stag:string; begin

 sel := WFClasseA.CreateSelector('unEntier>%1',,true,[10]);
 sel.InQueue('MyQueue','wfclassea/@oid');

 // Use default enumeration 
 S := ; stag := ;
 foreach obj in MyQueue do
  begin
    inst := obj.queueRef as WFClasseA;
    if Assigned(inst) then
      try
        if inst.unEntier=21 then raise Exception.Create('check error');
        //
          S := S+stag+inst.unCode;
          stag := ',';
          // Check to test requeue
          // delete this queue object
          obj.DeleteThisObject;
      except
      // on error requeue the object with the same topic
      // Correct because the enumeration is ordered on queueID
      obj.ReQueue();
      end;
  end;

 showMessage(S);

end; </source>

Voir aussi

• Enumérateur sur un sujet

{{#if:Classe_file_d'attente_(stereotype)|

{{#if:Classe_file_d'attente_(stereotype)|— Classe_file_d'attente_(stereotype) |}} — Développement DSM —

|

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

}}