Рамка у круглого label

@WizarD_89 · Регистрация: 24.05.2011

Author24 — интернет-сервис помощи студентам

Здравствуйте. Подскажите как можно сделать рамку для круглого лейбла.

Есть свой класс, унаследованный от label

Круглым я его сделал таким образом:

VB.NET

1
2
3

    Private gPath As New System.Drawing.Drawing2D.GraphicsPath()
       gPath.AddEllipse(0, 0, Me.Width, Me.Height)
        Me.Region = New Region(gPath)

LapisAlchemist · 26.06.2012, 23:23

Поставить свойство BorderStyle у label в FixedSingle?

И вообще: у Вас код на VB.NET, с этим в соответствующий раздел.

@WizarD_89 · 27.06.2012, 05:40 **[ТС]**

к сожелению данное свойство не делает нормальную рамку для круглого лейбла, оно там квадратное >.<

Eugene22 · 27.06.2012, 11:52

WizarD_89, вам надо нарисовать два эллипса - один большой будет иметь цвет рамки, а другой чуть по меньше и будет основным полем для метки - таким образом второй накладывается на первый и получается эффект границы вокруг второго эллипса

@WizarD_89 · 27.06.2012, 13:07 **[ТС]**

Вы имеете в виду что то типа того?

VB.NET

  
Protected Overrides Sub OnPaint(ByVal e As System.Windows.Forms.PaintEventArgs)
        border()
        MyBase.OnPaint(e)
 
    End Sub
Private Sub border()
        Dim dw As Graphics = Me.CreateGraphics
         Dim p As New Pen(Color.Black, 4)
        dw.DrawEllipse(p, 0, 0, Me.Width, Me.Height)
        dw.DrawEllipse(p, 1, 1, Me.Width, Me.Height)
    End Sub

только вот таким способ на лейбле не каких изменений не происходит.

Eugene22 · 27.06.2012, 13:11

Сообщение от WizarD_89

Вы имеете в виду что то типа того?

нет, я имел ввиду нарисовать два эллиса, а не один

@WizarD_89 · 27.06.2012, 13:25 **[ТС]**

да дело не в этом, даже если FillEllipse использовать то не каких изменений не видно. ничего не прорисовывается. И с двумя элипсами точно так же

Eugene22 · 27.06.2012, 13:34

Сообщение от WizarD_89

да дело не в этом, даже если FillEllipse использовать то не каких изменений не видно. ничего не прорисовывается. И с двумя элипсами точно так же

если так делать

VB.NET

1 2	dw.DrawEllipse(p, 0, 0, Me.Width, Me.Height) dw.DrawEllipse(p, 1, 1, Me.Width, Me.Height)

то кончено, ничего и не будет. На фига у второго эллипса задавать ширину и высоту области, равную первому. Потом можно было использовать не 1. а как то пошире отступ сделать.
И самое главное, ничего и не будет видно, потому что в данном случае используется один и тот же цвет для обоих эллипсов.

@WizarD_89 · 27.06.2012, 20:25 **[ТС]**

VB.NET

        Dim dw As Graphics = Me.CreateGraphics
        Dim p As New Pen(Color.Black, 4)
        Dim p2 As New Pen(Color.Red, 3)
        dw.DrawEllipse(p, 0, 0, Me.Width, Me.Height)
        dw.DrawEllipse(p2, 3, 3, Me.Width - 3, Me.Height - 3)

вот сделал как вы просили).Сейчас что то мигает при создании элемента, но потом исчезает и все равно можно сказать нечего не прорисовывается

Добавлено через 11 минут
Если допустим использовать круглый panel то прорисовывается все на ура.

Добавлено через 1 минуту
бррр, я понял как это сделать.
Нужно было напримую рисовать через событие onPaint, и использовать e.Graphics.

Не понятно почему не работало через Me.CreateGraphics

Спасибо парни за помощь

LapisAlchemist 251 / 163 / 14 Регистрация: 10.03.2012 Сообщений: 544
	26.06.2012, 23:23	2
	Поставить свойство BorderStyle у label в FixedSingle? И вообще: у Вас код на VB.NET, с этим в соответствующий раздел. 0

@WizarD_89 1 / 1 / 0 Регистрация: 24.05.2011 Сообщений: 63
	27.06.2012, 05:40 [ТС]	3
	к сожелению данное свойство не делает нормальную рамку для круглого лейбла, оно там квадратное >.< 0

Eugene22 _ 2364 / 1243 / 78 Регистрация: 28.10.2009 Сообщений: 4,331
	27.06.2012, 11:52	4
	WizarD_89, вам надо нарисовать два эллипса - один большой будет иметь цвет рамки, а другой чуть по меньше и будет основным полем для метки - таким образом второй накладывается на первый и получается эффект границы вокруг второго эллипса 0

Eugene22 _ 2364 / 1243 / 78 Регистрация: 28.10.2009 Сообщений: 4,331
	27.06.2012, 13:11	6
	Сообщение от WizarD_89 Вы имеете в виду что то типа того? нет, я имел ввиду нарисовать два эллиса, а не один 0

@WizarD_89 1 / 1 / 0 Регистрация: 24.05.2011 Сообщений: 63
	27.06.2012, 13:25 [ТС]	7
	да дело не в этом, даже если FillEllipse использовать то не каких изменений не видно. ничего не прорисовывается. И с двумя элипсами точно так же 0

	27.06.2012, 20:25