Tester si un TStrings ou TStringList est vide

Salut à tous,

Quand on parcour une liste on utilise generalement

Code:

---

1 2 3

For i := 0 to MaList.Count -1 do .....

---

Ma question est :
Count vaut combien si la liste est vide çad pas de ligne ou bien,
comment tester qu'une TStrings ou tStringList est vide

Merci

Count vaut 0 si la liste est vide
le probleme c'est que tu peux avoir des espaces

Dans ce cas elle est vraiment vide si

Code:

---

Trim( MaList.Text ) = ''

---

Rmq, je ne sais pas si Trim retire les retour chariot
sinon le code serait

Code:

---

Trim( StringReplace( MaListe.Text, #13#10, '', [ rfReplaceAll ] ) ) = ''

---

Merci,

Je teste et je posterais le resultat.

Encore merci.

Andry

Citation:

---

Envoyé par TicTacToe

Rmq, je ne sais pas si Trim retire les retour chariot
sinon le code serait

---

Citation:

---

Envoyé par Aide delphi

Trim supprime les caractères de contrôle et les espaces se trouvant en début et en fin de chaîne.

---

Donc les retour chariot sont bien pris en compte ;)

ok malatar :oops: ,
je suis pas sous delphi, donc pas de F1 vite fait possible ;)

if TaStringList.count=0 Then TaList est vide

Citation:

---

Envoyé par Soulama

if TaStringList.count=0 Then TaList est vide

---

Je dirai même plus :

Code:

---

if TaStringList.count=0 Then TaStringList est vide

---

:wink:

Ok ta raison :oops: