Autor Tema: Cambiar El Color Del Texto (Leído 2425 veces)

Shiquilla · « **en:** Domingo 6 de Junio de 2004, 18:33 »

Buenas tardes a todos/as los foreros. Mi pregunta es una tontería pero es que no doy con la respuesta!

No sé cuál es la propiedad (o código) para que, cuando tengo un TextBox con la propiedad Enabled a FALSE, no me salga el color de texto del TextBox en gris sino que esté negro.

Espero haberme explicado bien y que puedan ayudarme.

Un saludo, muchas gracias.

camarena6 · « **Respuesta #1 en:** Lunes 7 de Junio de 2004, 17:41 »

HOLA:

Creo que para lo que quieres sencillamente no se puede al bloquear un Textbox este no cambia a negro, ni cambiandole el Forecolor.

Podrias intentar bloquear el textbox de otra manera diferente como que en el evento Gotfocus mandas el enfoque a otro objeto diferente (como otro textbox) ú otro objeto. EJEMPLO:

Código: Text

Private Sub Text1_GotFocus()
txtsearch.SetFocus
End Sub
 

Esto te permite que tu textbox no lo puedan acceder y lo puedes mantener Enabled =True y con letra negra

Citar

El que no aperra, No prospera

tiquinho · « **Respuesta #2 en:** Lunes 7 de Junio de 2004, 19:04 »

Si lo que buscas es que no modifiquen el texto, prueba con la propiedad Locked manteniendo Enabled = True, pero se verá el cursor y podrán seleccionar el texto.

Otra solución un poco bruta es incluir el TextBox dentro de un Frame sin borde y ajustado al mismo tamaño, y en vez de poner la propiedad Enabled del TextBox a False, poner la del Frame(yo hice algo así y va bien

)

Bueno, a ver si te sirve de algo

Cyclop · « **Respuesta #3 en:** Martes 8 de Junio de 2004, 20:01 »

Pudieras hacerlo asi:

Crear un modulo MyLibs.Bas

Código: Text

 
Sub EnableControl(ByRef oControl As Object, ByVal lEnabled as Boolean)
       oControl.Enabled =lEnabled
       If lEnabled Then
          oControl.ForeColor = nColorNegro
          oControl.BackColor = nColorBlanco
        Else
          oControl.ForeColor = nColorNegro
          oControl.BackColor = nColorGris
       EndIf
End Sub
 
 

Salu2 espero que te ayude

Cyclop

Kev · « **Respuesta #4 en:** Martes 8 de Junio de 2004, 23:44 »

Bloque el TextBox de otra forma, en el evento Keypress bloquea las teclas (que no funcione ninguna),

Adios.

Shiquilla

Muchas gracias a todos, este fin de semana probaré a ver si me funciona alguna de vuestras opciones.

PD: Kev, no puedo hacer eso en el evento KeyPress porque se ponen Enabled o no Enabled según ciertos datos, pero gracias.

Un saludo

RadicalEd

COLOCALO ASI

Código: Text

 
Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = 0
End Sub
 

FUNCIONA MUY BIEN

SoloCodigo

Autor Tema: Cambiar El Color Del Texto (Leído 2425 veces)

Shiquilla

Cambiar El Color Del Texto

camarena6

Re: Cambiar El Color Del Texto

tiquinho

Re: Cambiar El Color Del Texto

Cyclop

Re: Cambiar El Color Del Texto

Kev

Re: Cambiar El Color Del Texto

Shiquilla

Re: Cambiar El Color Del Texto

RadicalEd

Re: Cambiar El Color Del Texto