1 pièce(s) jointe(s)
Probleme de taille du linklabel avec mousehover
Bonsoir,
J'ai crée des linklabel avec l'option mousehover qui permet de multiplier la taille par 2 et l'option MouseLeave pour rendre la taille telle qu'elle est..Mais parfois si j'ouvre le formulaire qui contient les liens je les trouve petit.
L'image en pj ci dessous contient l'imprime écran de mon formulaire qui contient le probleme qui est encadré en rouge.
Et voici mon code si dessous
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13
|
Private oldFont As Font
Private coeff As Single = 2
Private Sub LinkLabel9_MouseHover(ByVal sender As Object, ByVal e As System.EventArgs) Handles LinkLabel9.MouseHover
oldFont = LinkLabel9.Font
LinkLabel9.Font = New Font(LinkLabel9.Font.Name, LinkLabel9.Font.SizeInPoints * coeff, LinkLabel9.Font.Style)
End Sub
Private Sub LinkLabel9_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles LinkLabel9.MouseLeave
LinkLabel9.Font = oldFont
LinkLabel9.Font = New Font(LinkLabel9.Font.Name, LinkLabel9.Font.SizeInPoints, LinkLabel9.Font.Style)
End Sub |
Merci de m'aider