Topic (TStereotypeClassQueue)
De Wiki1000
(Différences entre les versions)
(Page créée avec « <source lang='delphi'>class function Topic(const iTopic:string):TQueueEnumerator;</source> Cette fonction retourne un énumérateur des objets disponibles sur un sujet. ... ») |
|||
Ligne 6 : | Ligne 6 : | ||
|- | |- | ||
|Result | |Result | ||
− | |Un type | + | |Un type énumérateur |
|- | |- | ||
|iTopic | |iTopic | ||
Ligne 49 : | Ligne 49 : | ||
Voir aussi | Voir aussi | ||
− | *[[ | + | *[[Default enumerator (TStereotypeClassQueue)|Enumérateur par défaut]] |
− | + | ||
{{Footer|Classe_file_d'attente_(stereotype)}} | {{Footer|Classe_file_d'attente_(stereotype)}} | ||
[[Category:Stéréotype file d'attente]] | [[Category:Stéréotype file d'attente]] |
Version actuelle en date du 22 avril 2013 à 14:18
class function Topic(const iTopic:string):TQueueEnumerator;
Cette fonction retourne un énumérateur des objets disponibles sur un sujet.
Result | Un type énumérateur |
iTopic | Nom de sujet demandé. |
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. |
Exemple :
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'); S := ''; stag := ''; foreach obj in MyQueue.Topic('') 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;
Voir aussi
Whos here now: Members 0 Guests 0 Bots & Crawlers 1 |