Discussion :

[yannfrance]

Bonjour,

J'ai un soucis avec les lisbox et combobox.
j'envoie du texte dans un memo, cela fonctionne:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Visible Users
1x
Hidden Users
Click name to view
yannfrance
Lurkers

Mais quand je veut faire la même chose dans une listBox ou un combobox, ça me donne les 6 premières lettres, ensuite le reste est remplacé par des caratères étranges, des carrés, des flèches, des choses incomphrensible.
Pourtant, dans le memo ça fonctionne.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Memo1.lines.Append(tvi.pszText); // ca fonctionne
        ListBox1.Items.Add(tvi.pszText); // fonctionne pas, il donne des caratères à la place

[Just-Soft]

Salut;

ça me paraît logique du moment que ListBox.Add attend des éléments et pas un fichier texte entier. Pour pouvoir faire ça faut utiliser une boucle genre :

tant que pas fin de fichier faire
lire ligne
ajouter ligne dans ListBox
aller ligne suivante
fin tant que.

Bonne chance.

[yannfrance]

Merci de t'interresser au problème.
C'est pas ça, je ne souhaite pas prendre les infos du memo, mais prendre les infos de

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

tvi.pszText

Dans la lisbox, je trouve bien les lignes, mais seul les 6 premieres lettres des lignes sont comprehensible, le reste, c'est du charabia.
je pense que c'est un problème de format, quelques choses comme ça.
le reste du code est bon.
merci

[Cl@udius]

Salut

Que contient tvi.pszText ?
Une simple string, ou bien une chaine plus complexe avec des #13#10 par exemple.

@+

[Just-Soft]

Désolé j'ai pas bien pigé mais je garde l'idée de la boucle elle me paraît faisable. une autre alternative tu peux faire ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ListBox1.Items.Text := memo1.Text;

Bonne chance.

[yannfrance]

Merci Just-Soft ,
cela fonctionne
Sinon, c'était aussi une erreur de ma part :
J'ai mis :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Memo1.lines.Append(tvi.pszText); // ca fonctionne
        ListBox1.Items.Add(tvi.pszText);

mais les 2 resultats ne fonctionne pas, donc, j'ai virer le memo, et resultat, c'est bon.
Bizarre, mais ça fonctionne, merci beaucoup pour ta participation