Lignes Multicolores TextBox

Version imprimable

30/01/2007, 16h17
ArHacKnIdE

Lignes Multicolores TextBox

Bonjour à tous,

Voilà j'ai une TextBox en multiligne dont j'aimerai que l'affichage d'une ligne sur deux soit de couleurs différentes, exemple :

noir
bleu
noir
bleu
...

J'aimerai donc savoir comment faire pour que la TextBox affiche automatiquement une ligne sur deux en bleu.

Merci :)
30/01/2007, 16h25
Vld44

Salut,

Je ne suis pas sûr que ce soit possible.
L'alternative serait d'utiliser un composant richtextbox à mon avis, et encore s'il le permet.
30/01/2007, 16h26
AlainTech

Il faut utiliser un RichTextBox.
30/01/2007, 16h30
ArHacKnIdE

Merci à vous.

Voilà j'ai trouvé le RichTextBox mais je ne trouve toujours pas comment atteindre mon but pour avoir une ligne sur deux en bleu :?

Merci :)
30/01/2007, 16h41
ArHacKnIdE

Voilà j'ai trouvé ça :

Code:

RichTextBox1.SelColor = 12640511

Mais me faudrait maintenant différencier les lignes, par exemple avec pair ou impair, je vais aller chercher...

Encore Merci :)

Voilà je pense avoir trouvé avec ça :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 Private Sub TextBox1_Change() nbrlignes = SendMessageLong(TextBox1.hwnd, EM_GETLINECOUNT, 0&, 0&) modulo = nbrlignes Mod 2 If modulo = 1 Then TextBox1.SelColor = 12640511 Else TextBox1.SelColor = 13640511 End If End Sub
Merci à vous deux de m'avoir mis sur la piste du RichTextBox :)

EDIT : zazaraignée, je suis preneur de ton code et je l'attends :D

Merci

Salut

J'ai fait ceci:
Code:

1 2 3 4 5 6 7 8 9 10 11 Private Sub RichTextBox1_Change() Dim ligne As Long ligne = RichTextBox1.GetLineFromChar(RichTextBox1.SelStart) If ligne Mod 2 = 0 Then ' en noir RichTextBox1.SelColor = vbBlack Else 'en bleu RichTextBox1.SelColor = vbBlue End If End Sub
Mais ce n'est pas encore parfait. Si on fait un changement de ligne en tapant sur Entrée, ça va. Mais si on a un retour à la ligne automatique, il reste un premier caractère de la couleur de la ligne précédente. Voir l'image jointe.

30/01/2007, 17h35
ArHacKnIdE

Merci beaucoup :)

En fait dans mon cas les données arrivent automatiquement dans le RichTextBox par un socket, mais pour ça je vais tenter de me debrouiller seul :)

PS : Je met en résolu mais j'accepte toujours d'autres commentaires...
31/01/2007, 21h07
zazaraignée

Ok, si j'ai d'autres idées, j'avise. Mais j'enlève le résolu pour être certain que ton problème sera lu dans l'optique de donner une réponse plutôt que d'en recevoir.