TCL supprime un élément d'une liste

Question

Comment enlever un élément d'une liste TCL :

1. qui a un indice = 4
2. qui a pour valeur = "aa"

J'ai fait des recherches sur Google et je n'ai pas encore trouvé de fonction intégrée.

Answer 1

Vous pouvez aussi essayer comme ceci :

set i 0
set myl [list a b c d e f]

foreach el $myl {
   if {$el in {a b e f}} {
      set myl [lreplace $myl $i $i]
   } else {
      incr i
   }
}
set myl

Answer 2

Il y a deux façons simples de procéder.

# index
set mylist "a c b"
set mylist [lreplace $mylist 2 2]
puts $mylist 
a b

# value
set idx [lsearch $mylist "b"]
set mylist [lreplace $mylist $idx $idx]
puts $mylist
a