OVH Cloud OVH Cloud

Changer la police control enabled = false

5 réponses
Avatar
Jeannot
Par défaut si dans un control Enabled = False, la police est grise et donc
assez difficile à lire.

Comment avec VB6 pour une fenètre ou pour une application changer
systématiquement cette couleur en Bleu par exemple.

Peut-on aussi passer le font en Italique.
--
Merci beaucoup pour votre aide

5 réponses

Avatar
X
Bonjour, cici:

nom_objet.ForeColor = &HFF0000 ' bleu
nom_objet.FontItalic = True

Ça peut se changer dans le code ou la propriété de l'objet
--------------


"Jeannot" a écrit dans le message de
news:
| Par défaut si dans un control Enabled = False, la police est grise et donc
| assez difficile à lire.
|
| Comment avec VB6 pour une fenètre ou pour une application changer
| systématiquement cette couleur en Bleu par exemple.
|
| Peut-on aussi passer le font en Italique.
| --
| Merci beaucoup pour votre aide
Avatar
Jeannot
J'ai appliqué la solution Forecolor = &HFF0000

Cette solution donne bien une couleur bleu lorsque Enabled = true, mais la
couleur revient au gris lorsque enabled = false dans un textbox.

Par contre le caractère italique est bien activé en enabled = true et
enabled = false

Merci si vous pouvez me donner un autre conseil.

Texte du programme écrit:

With txtMsg
.Enabled = False
.ForeColor = &HFF0000 ' bleu
.FontBold = True
.FontItalic = True
End With

txtMsg = "Bonjour"


--
Merci beaucoup pour votre aide


"X" a écrit :

Bonjour, cici:

nom_objet.ForeColor = &HFF0000 ' bleu
nom_objet.FontItalic = True

Ça peut se changer dans le code ou la propriété de l'objet
--------------


"Jeannot" a écrit dans le message de
news:
| Par défaut si dans un control Enabled = False, la police est grise et donc
| assez difficile à lire.
|
| Comment avec VB6 pour une fenètre ou pour une application changer
| systématiquement cette couleur en Bleu par exemple.
|
| Peut-on aussi passer le font en Italique.
| --
| Merci beaucoup pour votre aide





Avatar
Fred
Dans le message:,
Jeannot écrit:
Par défaut si dans un control Enabled = False, la police est grise et
donc assez difficile à lire.



Bonjour,
C'est le comportement de Windows qui veut cela. Je doute que l'on puisse
passer outre facilement.
Tu peux éventuellement procéder autrement.
Il y a une propriété Locked qui permet d'interdire l'édition sur un
textbox.
Couplée avec un changement de couleur à ta convenance cela peut
peut-être faire l'affaire.
Le texte reste cependant sélectionnable. Avantage ou inconvénient, à toi
de voir.
J'utilise beaucoup ce procédé en place d'un simple label pour justement
permettre à l'utilisateur de faire un copier/coller du contenu.


--
Fred
http://www.cerbermail.com/?3kA6ftaCvT
Avatar
Jacques93
Jeannot a écrit :
Par défaut si dans un control Enabled = False, la police est grise et donc
assez difficile à lire.

Comment avec VB6 pour une fenètre ou pour une application changer
systématiquement cette couleur en Bleu par exemple.

Peut-on aussi passer le font en Italique.



Une autre solution, un peu plus lourde que celle de Fred, mais juste
pour info :

MyEnable Text1, True | False

Private Sub MyEnable(Txt As TextBox, Optional b As Boolean = True)
With Txt
If b Then
.BackColor = vbWindowBackground
.ForeColor = vbWindowText
.FontItalic = False
Else
.BackColor = vbButtonFace
.ForeColor = vbBlue
.FontItalic = True
End If
End With
End Sub


Private Sub Text1_KeyPress(KeyAscii As Integer)
If Me.Text1.BackColor = vbButtonFace Then KeyAscii = 0
End Sub

Si beaucoup de contrôles sont concernés, créer un groupe de contrôle ;-)
ou se lancer dans l'écriture d'un ActiveX. :-D

--
Cordialement,

Jacques.
Avatar
X
Bonjour, en complément et suivant ce principe:

Mettre un label et un textBox l'un sous l'autre et jouer avec les propriété
"objet.visible=true/false"
Quand on doit saisir, on affiche les texteBox, et a contrario le label :o)
--------


"Fred" a écrit dans le message de news:

| Dans le message:,
| Jeannot écrit:
| > Par défaut si dans un control Enabled = False, la police est grise et
| > donc assez difficile à lire.
|
| Bonjour,
| C'est le comportement de Windows qui veut cela. Je doute que l'on puisse
| passer outre facilement.
| Tu peux éventuellement procéder autrement.
| Il y a une propriété Locked qui permet d'interdire l'édition sur un
| textbox.
| Couplée avec un changement de couleur à ta convenance cela peut
| peut-être faire l'affaire.
| Le texte reste cependant sélectionnable. Avantage ou inconvénient, à toi
| de voir.
| J'utilise beaucoup ce procédé en place d'un simple label pour justement
| permettre à l'utilisateur de faire un copier/coller du contenu.
|
|
| --
| Fred
| http://www.cerbermail.com/?3kA6ftaCvT
|