Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - .NET

Страница: 1 |

 

  Вопрос: Помогите, горю Добавлено: 18.08.05 13:57  

Автор вопроса:  Екатерина
Необходимо в ряд друг за другом выстроить к примеру Label
так что бы была конкретная строка(значения знаю), и по клику на каждой выделение нужного эл-та в ListBox.
Когда создаю Label и autosize = true то они длинее чем текст внутри них и между ними пустой зазор,а если курсивом то еще и перекрывают друг друга.
Никак не могу разобратся с прозрачностью фона или опрелится с длинной непосредственно текста внутри Label
Пишу в Studio Net 7/1 2003

Ответить

  Ответы Всего ответов: 5  

Номер ответа: 1
Автор ответа:
 Павел



Администратор

ICQ: 326066673 

Вопросов: 368
Ответов: 5968
 Web-сайт: www.vbnet.ru
 Профиль | | #1
Добавлено: 18.08.05 14:09
Попробуйте:

Dim Font As New Font("Times New Roman", 10, FontStyle.Italic, GraphicsUnit.Point)
Dim size As SizeF = Label.CreateGraphics.MeasureString("строка", Font)


Ответить

Номер ответа: 2
Автор ответа:
 Екатерина



Вопросов: 23
Ответов: 25
 Профиль | | #2 Добавлено: 18.08.05 16:00
<System.Runtime.InteropServices.ProgId(";DllNormalesNotes.ClIndication";)> Public Class ClIndication
    Public Name As String
    Public Value As String
    Public MyLabel As New System.Windows.Forms.Label
    Public size As System.Drawing.SizeF = Me.MyLabel.CreateGraphics.MeasureString("строка", Me.MyLabel.Font)

    Public Sub New()
        Me.Name = ""
        Me.Value = ""
        Me.MyLabel.Text = "GGG G"
        Me.MyLabel.AutoSize = True
        Me.MyLabel.Font = New System.Drawing.Font("Times New Roman", 14, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point)
        'Me.MyLabel.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, CType((System.Drawing.FontStyle.Bold), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(204, Byte), True)
       Me.MyLabel.ForeColor = System.Drawing.Color.Green
        Me.MyLabel.TabIndex = 0
        Me.MyLabel.Top = 40
        Me.MyLabel.BackColor = System.Drawing.Color.Transparent
        'Me.MyLabel.Size as System.Drawing.SizeF = Me.MyLabel.CreateGraphics.MeasureString("строка", Me.MyLabel.Font)
        Me.MyLabel.CreateGraphics.MeasureString("строка", Me.MyLabel.Font)
        'Public size As SizeF = Label.CreateGraphics.MeasureString("строка", Font)

    End Sub
 End Class

Потом где то на форме MyLabel вставляю в GroupBox

Графика как то все равно искажена, не совсем поняла что такое size///

Ответить

Номер ответа: 3
Автор ответа:
 Екатерина



Вопросов: 23
Ответов: 25
 Профиль | | #3 Добавлено: 18.08.05 16:46
Спасибо, но отступы все равно есть

Ответить

Номер ответа: 4
Автор ответа:
 Павел



Администратор

ICQ: 326066673 

Вопросов: 368
Ответов: 5968
 Web-сайт: www.vbnet.ru
 Профиль | | #4
Добавлено: 18.08.05 17:43
Это я Вам дал код для вычисления размеров текста. В size - ширина и высота текста "строка" для конкретного Label'а.

Ответить

Номер ответа: 5
Автор ответа:
 Екатерина



Вопросов: 23
Ответов: 25
 Профиль | | #5 Добавлено: 18.08.05 18:38
Спасибо я так и сделала все получилось, огромное спасибо

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам