AddListWhere (objectlist)

De Wiki1000
Version du 9 avril 2013 à 11:19 par Syfre (discuter | contributions)
(diff) ← Version précédente | Voir la version courante (diff) | Version suivante → (diff)

version650-32x32.png

procedure AddListWhere(ls:TObjectList; const iExpression:string; const iArgs:Variant);

Cette procédure ajoute les objets de la liste passée en paramètre qui vérifient une expression et qui ne sont pas déjà présent dans la liste.

ls Liste a ajouter.
iWhere Expression objet retournant le critère d'ajout.
iArgs Paramètres des expressions objets.

pseudo-code :

  For each ls.items[]
    if ls.Items[].Evaluate() and
       not (exists self.items[] where self.Items[].InstanceOID=ls.Items[].InstanceOID)
    then Add ls.items[]


Voir aussi:

Exemple:

begin
end;


Listes d'objets (tech)Développement DSM





Whos here now:   Members 0   Guests 0   Bots & Crawlers 1
 
Outils personnels