Mettre des bords arrondi a une textBox [Résolu]

Question

Posez votre question Signaler

Mettre des bords arrondi a une textBox [Résolu]

grosdur59

Messages postés: 35
Date d'inscription: jeudi 25 septembre 2008
Dernière intervention: 28 août 2010

- 25 août 2010 à 16:42 - Dernière réponse : grosdur59

Messages postés: 35
Date d'inscription: jeudi 25 septembre 2008
Dernière intervention: 28 août 2010

- 28 août 2010 à 10:38

VB.NET Posez votre question Signaler

Bonjour à tous.

N'ayant jamais recréer de controls jen appelle a votre savoir ^^, je voudrais juste pouvoir changer les bords d'une textBox
je c'est qui faut créer un nouveau projet, ensuite cliquer sur userControl, à cette feuille on ajoute une textBox et après je c'est pas tro ce qui faut faire ^^.
Je pense qui faut Hérité de la classe Mère donc de TextBox et ensuite je pense modifier la méthose OnPaint mais quoi mettre dedans c'est la le problème.

Je vous remercie d'avance pour vos réponse.

Afficher la suite

A voir également:

Votre réponse

Répondre au sujet

3 réponses

Signaler Commenter la réponse de Utilisateur anonyme

Utilisateur anonyme 27 août 2010 à 21:27

0

Merci

a l'aide du tableau de point (pt dans mon exemple) si tu as la patience et que tu es bon dessinateur, en agrandissant ce tableau tu peux même faire une textbox en forme de canard par exemple ;)
Pour info la plupart des contrôles sont "régionables".
Essaye sur la derniere ligne :

Me.Region = New Region(path)

Bonne nuit

Signaler Commenter la réponse de grosdur59

grosdur59

Messages postés: 35
Date d'inscription: jeudi 25 septembre 2008
Dernière intervention: 28 août 2010

28 août 2010 à 10:38

0

Merci

Ah merci super franchement chapeau !
Vous ête tous super ici !

Votre réponse

Répondre au sujet

Posez votre question

Utilisateur anonyme · Accepted Answer · 2010-08-27T21:15:13+0200

salut,
tu peux te servir aussi du "régionage" de ton textbox :

Imports System.Drawing.Drawing2D
Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        With TextBox1
            .BorderStyle = BorderStyle.None
            .BackColor = Color.GreenYellow
            .Multiline = True
            .Size = New Size(90, 30)
        End With
        Dim pt(8) As Point
        pt(0) = New Point(8, 0)
        pt(1) = New Point(TextBox1.Width - 8, 0)
        pt(2) = New Point(TextBox1.Width, 8)
        pt(3) = New Point(TextBox1.Width, TextBox1.Height - 8)
        pt(4) = New Point(TextBox1.Width - 8, TextBox1.Height)
        pt(5) = New Point(8, TextBox1.Height)
        pt(6) = New Point(0, TextBox1.Height - 8)
        pt(7) = New Point(0, 8)
        pt(8) = New Point(8, 0)
        Dim _region(pt.Length - 1) As Byte
        For x = 0 To pt.Length - 1
            _region(x) = PathPointType.Line
        Next
        Dim path As New GraphicsPath(pt, _region)
        TextBox1.Region = New Region(path)
    End Sub
End Class

Bonne nuit

Mettre des bords arrondi a une textBox [Résolu]

Votre réponse

Votre réponse

Votre réponse

Vous n'êtes pas encore membre ? inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Vous n'êtes pas encore membre ?

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