3 réponses à ce sujet

[dga]

Bonjour, simple pour certains et hard pour d'autres...bref

je désire éliminer les doublons mais n'y arrive pas

global gGrandRepertoireModeles

on enterframe me

-- le champ texte "f_text_1" contient toutes les données sources qui servent à constituer les listes

set gGrandRepertoireModeles = list()
repeat with c = 1 to member("f_text_1").linecount

-- je ne veux pour l'instant que 1(un) item par ligne de ce champ pour ma liste
gGrandRepertoireModeles.add(item 2 of line c of field "f_text_1")
    end repeat
    gGrandRepertoireModeles.sort()

-- ensuite je compare...mais cela ne fonctionne pas bien
set dd = gGrandRepertoireModeles.count
  repeat with d = dd to 1
    if gGrandRepertoireModeles.getAt(d) <> item 2 of line d of field "f_text_1" then
    put gGrandRepertoireModeles.getAt(d) into line d of field "f_MaListeFinale"
end if
end repeat

Merci pour l'aide.

[glurp]

Bonjour dga,

Il y a plus facile pour repérer un élément dans une liste : getOne()

Tu pourrais donc directement dans la première boucle vérifier qu'il n'existe pas déjà le même élément dans la liste avant de l'ajouter

[dga]

Je débute...peux-tu svp me donner un exemple. Merci.

[glurp]

Et bien si je reprends ton code, ça ressemblerait à ceci :

global gGrandRepertoireModeles

on enterframe me

   -- le champ texte "f_text_1" contient toutes les données sources qui servent à constituer les listes

   gGrandRepertoireModeles = []
   tNbLines = member("f_text_1").line.count
   repeat with c = 1 to tNbLines

      -- je ne veux pour l instant que 1(un) item par ligne de ce champ pour ma liste
      tValue = member("f_text_1").line[c].item[2]
      if gGrandRepertoireModeles.getOne(tValue) = 0 then
         gGrandRepertoireModeles.add(tValue )
      end if

   end repeat

   gGrandRepertoireModeles.sort()

 

C'est plus simple, non ?

Note que j'ai remplacé la "vieille" syntaxe que tu utilisais par la syntaxe en point (le verbose, c'est lourd ).
J'ai aussi utilisé une variable pour spécifier le nombre de lignes du textes, parce que sinon le processeur perd du temps à chaque fois pour refaire le calcul

Attention que j'ai écrit ce code directement sur le forum, je ne l'ai donc pas testé sous Director (je précise si jamais il y a des fautes de frappe).