Richtexbox transparente en vb.net

Soyez le premier à donner votre avis sur cette source.

Snippet vu 13 806 fois - Téléchargée 31 fois

Contenu du snippet

Classe pour transparence d'une richtextbox (source introuvable ailleur)

mettez une image en fond dans une form !

ajouter un richtextbox

puis dans le code remplacer :

Me.Rich1 = New System.Windows.Forms.RichTextBox

par

Me.Rich1 = New TransparentRichTextBox

et ca :

Friend WithEvents Rich1 As System.Windows.Forms.RichTextBox

par

Friend WithEvents Rich1 As TransparentRichTextBox

mais avant creer une nouvelle class et coller le code :)

amusez vous bien et bonne prog

Source / Exemple :


Class TransparentControl
    Inherits Control

    Public Sub New()
        MyBase.SetStyle(ControlStyles.UserPaint, True)
        MyBase.SetStyle(ControlStyles.OptimizedDoubleBuffer, True)
        MyBase.SetStyle(ControlStyles.SupportsTransparentBackColor, True)
        MyBase.UpdateStyles()
        MyBase.Visible = True
    End Sub

End Class

Class TransparentRichTextBox
    Inherits RichTextBox

    Public Sub New()
        MyBase.ScrollBars = RichTextBoxScrollBars.None
    End Sub

    Protected Overloads Overrides ReadOnly Property CreateParams() As CreateParams
        Get
            Dim cp As CreateParams = MyBase.CreateParams
            cp.ExStyle = cp.ExStyle Or 32
            Return cp
        End Get
    End Property

    Protected Overloads Overrides Sub OnPaintBackground(ByVal e As PaintEventArgs)
    End Sub
End Class

Conclusion :


Code realisé avec la colaboration bienvenue nhervagault qui m'a enlevé une grosse epine du pied

merci a lui

A voir également

Ajouter un commentaire

Commentaires

Messages postés
4
Date d'inscription
mercredi 9 mars 2005
Statut
Membre
Dernière intervention
18 octobre 2006

Finalement j'ai parlé trop vite...

Je n'ai plus les traits horizontaux, cependant si je tente de supprimer ce qui a été tapé, ca ne me supprime pas le texte... enfin pas avant que je double click ou autres sur ma RTB1

Quelqu'un a eu le pb?
Messages postés
4
Date d'inscription
mercredi 9 mars 2005
Statut
Membre
Dernière intervention
18 octobre 2006

Nikel :-)

Comme certains, j'avais des problèmes de rafraichissement. En fait, le trait de la barre qui clignote restait affiché.

Pour corriger le pb, j'ai mis dans l'événement previewKeyDown de rich1 la commande
Me.Rich1.refresh()

Et la no pb :-)
Messages postés
1
Date d'inscription
samedi 19 novembre 2005
Statut
Membre
Dernière intervention
19 novembre 2005

Thanks
Messages postés
60
Date d'inscription
jeudi 9 décembre 2004
Statut
Membre
Dernière intervention
10 mai 2007

Ouai, ils ont tous raison.
Le rafraichissment est très mauvais...
Messages postés
192
Date d'inscription
dimanche 23 janvier 2005
Statut
Membre
Dernière intervention
10 août 2009

bas qand j ecris la classe il me souligne quelque mot.
et quand je compile iil me dit qu y a des erreur
dsl g pa envi de le refere pour te dire quelle mot sont souligné
Afficher les 12 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.