Discussion :

[foudhailim]

Bousoir

j'ai utilisé le code suivant :

Code :

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

1
2
3
4
5
6
7
8
Private Sub ToolStrip9_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStrip9.MouseHover
        couleur = ToolStrip9.BackColor 
        ToolStrip9.BackColor = Color.Azure
End Sub
 
Private Sub ToolStrip9_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStrip9.MouseLeave
        ToolStrip9.BackColor = couleur
End Sub

le couleur revient a sont etat initial : Résultat atendu (c'est ne pas le cas)
Merci de votre aide

[Hinault Romaric]

ta variables couleur est de quel type ?

[foudhailim]

ta variables couleur est de quel type ?

le type est color déclaré public au niveau du module

[Hinault Romaric]

Procède comme ceci dans ton module déclare couleur comme string ensuite tu fait ceci

Code :

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

1
2
3
4
5
6
7
8
Private Sub ToolStrip9_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStrip9.MouseHover
        couleur = ToolStrip9.BackColor.Name
        ToolStrip9.BackColor = Color.Azure
End Sub
 
Private Sub ToolStrip9_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStrip9.MouseLeave
        ToolStrip9.BackColor =Color.FromName(couleur)
End Sub

[foudhailim]

Procède comme ceci dans ton module déclare couleur comme string ensuite tu fait ceci

Code :

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

1
2
3
4
5
6
7
8
Private Sub ToolStrip9_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStrip9.MouseHover
        couleur = ToolStrip9.BackColor.Name
        ToolStrip9.BackColor = Color.Azure
End Sub
 
Private Sub ToolStrip9_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStrip9.MouseLeave
        ToolStrip9.BackColor =Color.FromName(couleur)
End Sub

le resultat est la même, le couleur sa change mais l'effet disparu.
au départ le couleur resomble a selui d'outlouk "effet bombé" apres changement le couleur change mais effet plat "couleur unique"

[Hinault Romaric]

La je manque d'idée

[foudhailim]

Bonjour

dans la premiere figure l'état initial
dans la duxiemme figure represante l'exection de la fonction ToolStrip9_MouseHover
dans la troisieme figure représente l'exection de la fonction ToolStrip9_MouseLeave

je désire aprés avoir executé la fonction ToolStrip9_MouseLeave retrouver la premiere figure est non pas la troisieme figure

Code :

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

1
2
3
4
5
6
7
8
Private Sub ToolStrip9_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStrip9.MouseHover
couleur = ToolStrip9.BackColor.Name
ToolStrip9.BackColor = Color.Azure
End Sub
 
Private Sub ToolStrip9_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles ToolStrip9.MouseLeave
ToolStrip9.BackColor =Color.FromName(couleur)
End SubFigure 1 : Ressomble a celui de Outlouk 2007 exmple le Toolsrip "Courrier" ou "Calendrie"

Figure 2 : elle change devient comme rectangle avec un rempli avec un couleur unifier.

Figure 3 : comme la figure 2 mais avec un couleur différant

Moi je veux qu'elle aura le meme style que la figure 1 mais avec un couleur different dans la figure 2 et la meme couleure et style dans la figure 3

Cordialement

[Hinault Romaric]

Je crois que c'est au due au fait que la classe color représente les couleurs système hors la couleur que tu a définie pour ton stooltrip n'est surement pas une couleur système d'où la perte de l'effet, essaye d'utiliser la classe ColorTranslator voir mais va falloir que tu sache au préalable si la couleur que t'avais définie est une couleur OLe, Html ou Wind

[foudhailim]

Merci a tous et surtout lirome qui ma quidé vers la solution

j'ai trouver la solution est :

Code :

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

ToolStrip9.BackColor = Color.Empty

elle rendre le Toolstrip a son état initial