impossible de modifier l'apparence d'un tooltip

Version imprimable

26/08/2012, 00h01
veens777

impossible de modifier l'apparence d'un tooltip

bonjour,

j'ai créé "manuellement" un tooltip (tooltip1) dans un fenêtre (form1)
J'ai modifier la couleur de fond du tooltip 1 dans la propriété "backcolor"
je l'ai rattaché à un bouton (bouton1) en rentrant du texte dans la propriété tooltip sur tooltip1.

Le tooltip s'affiche bien lorsque je passe le curseur sur le bouton1 mais la couleur de fond reste celle par défaut...j'ai le même pb avec la propriété forecolor.

Comment se fait-il ? Les propriétés ont bien été modifiée pourtant, je ne comprends pas...

autre question sur l'apparence qui me pose pb : est-il possible d'afficher le texte du tooltype sur plusieurs lignes ?

Merci pour votre aide.
Cordialement.
26/08/2012, 01h27
Sankasssss

Bonsoir,

Citation:

Envoyé par veens777

J'ai modifier la couleur de fond du tooltip 1 dans la propriété "backcolor"
je l'ai rattaché à un bouton (bouton1) en rentrant du texte dans la propriété tooltip sur tooltip1.

Le tooltip s'affiche bien lorsque je passe le curseur sur le bouton1 mais la couleur de fond reste celle par défaut...j'ai le même pb avec la propriété forecolor.

Comment se fait-il ? Les propriétés ont bien été modifiée pourtant, je ne comprends pas...

Si on regarde cette propriété sur MSDN :

Citation:

Envoyé par MSDN

Unless the ToolTip is owner-drawn, this property is ignored.

Donc ce comportement est normal.

Citation:

Envoyé par veens777

autre question sur l'apparence qui me pose pb : est-il possible d'afficher le texte du tooltype sur plusieurs lignes ?

oui en concaténant le retour à la ligne (google ;)):

Code:

ToolTip1.SetToolTip(MonControl, "test" & vbCrLf & "retest")

donc finalement on est obliger de passer par du code...dommage
avec le code décrit par MSDN ça donne ça :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
    Private Sub ToolTip_Draw(ByVal sender As Object, ByVal e As System.Windows.Forms.DrawToolTipEventArgs) Handles ToolTip1.Draw
        ' Draw the standard background.
        e.Graphics.FillRectangle(Brushes.LemonChiffon, e.Bounds)
        ' Draw the custom border to appear 3-dimensional.
        e.Graphics.DrawLines( _
            SystemPens.ControlLightLight, New Point() { _
            New Point(0, e.Bounds.Height - 1), _
            New Point(0, 0), _
            New Point(e.Bounds.Width - 1, 0)})
        e.Graphics.DrawLines( _
            SystemPens.ControlDarkDark, New Point() { _
            New Point(0, e.Bounds.Height - 1), _
            New Point(e.Bounds.Width - 1, e.Bounds.Height - 1), _
            New Point(e.Bounds.Width - 1, 0)})
 
        'Specify custom text formatting flags. 
        Dim sf As TextFormatFlags = TextFormatFlags.VerticalCenter Or _
                             TextFormatFlags.HorizontalCenter Or _
                             TextFormatFlags.NoFullWidthCharacterBreak
        ' Draw standard text with customized formatting options.
        e.DrawText(sf)
    End Sub

Je te remercie pour ton aide.

27/08/2012, 08h25
Sankasssss

De rien, ça fait plaisir de voir que tu as regardé le lien :ccool: