Intersect (objectlist)
De Wiki1000
procedure Intersect(ls:TObjectList; const iExpression:string; const iArgs:Variant);
Cette procédure conserve les objets qui sont présents dans les deux listes et dont l'évaluation de la condition donne le même résultat.
Si la condition est vide les objets communs sont conservés.
ls | Liste avec laquelle réaliser l'intersection. |
iExpression | Expression objet vérifiée par les objets à retirer. |
iArgs | Paramètres des expressions objets. |
pseudo-code :
For each self.items[] if not exists ls.items[] where self.items[].Evaluate = ls2.items[].Evaluate then Remove self.items[]
Exemple:
begin end;
Voir aussi: