Textos con diferentes colores en TextBox

Iniciado por unish, 30 Diciembre 2006, 21:25 PM

0 Miembros y 1 Visitante están viendo este tema.

unish

Hola!!!

Kiciera saber si es posible y si alguien sabe.. ingresar textos en un textbox con diferentes colores...

Nose si me explico, por ejemplo en el msn. que muestra lo que x dijo con un color y lo que el otro dice con otro...

no necesariamente con un textbox sino como se pueda..
saludos.

CeLaYa

eso lo haces con un RichTextBox, mira lo puedes poner asi:


    RichTextBox1.Text = ""
    RichTextBox1.SelText = "Negro" + vbCrLf
    RichTextBox1.SelColor = vbRed
    RichTextBox1.SelText = "Rojo" + vbCrLf
    RichTextBox1.SelColor = vbBlue
    RichTextBox1.SelText = "Azul" + vbCrLf
    RichTextBox1.SelColor = vbYellow
    RichTextBox1.SelText = "Amarillo" + vbCrLf
    RichTextBox1.SelColor = RGB(255, 25, 200)
    RichTextBox1.SelText = "Ahora un color RGB" + vbCrLf


espero te sirva este ejemplo
"La soledad es el elemento de los grandes talentos".
Cristina de Suecia (1626-1689) Reina de Suecia.

<?BRoWLi?>

Project .> components .> Microsoft rich textbox control 6.0
Si TRaTaS D SeR JusTo SoLo Es JuSTo EL CoRaZóN, LoS DeMaS OrGaNoS TRaTaRaN De KiTaRLe La RaZoN - DobleV
Piratas.com.es

unish

#3
Gracias, era sencillo. No sabia que existia un componente para eso.
Muchas gracias.

Edit: Y si quiero poner por ejemplo el texto en negrita ?

Hans el Topo

si pones richtextbox1.   te salen todas las propiedades...xD
 

sp26

Cita de: CeLaYa en 30 Diciembre 2006, 22:07 PM
eso lo haces con un RichTextBox, mira lo puedes poner asi:


    RichTextBox1.Text = ""
    RichTextBox1.SelText = "Negro" + vbCrLf
    RichTextBox1.SelColor = vbRed
    RichTextBox1.SelText = "Rojo" + vbCrLf
    RichTextBox1.SelColor = vbBlue
    RichTextBox1.SelText = "Azul" + vbCrLf
    RichTextBox1.SelColor = vbYellow
    RichTextBox1.SelText = "Amarillo" + vbCrLf
    RichTextBox1.SelColor = RGB(255, 25, 200)
    RichTextBox1.SelText = "Ahora un color RGB" + vbCrLf


espero te sirva este ejemplo

No entiendo, y si hay palabras iguales, pintara todas las palabras? ...

Hendrix

"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián

Hans el Topo

sp26 va cambiando el color del texto... seltext  mete el texto y lo escribe con el color seleccionado...xD
 

unish

me fije en las propiedades pero todavia nose cual es para poner texto en negrita.
saludos!

Hans el Topo