VBNet - Форум - 2 вопроса:Measurestring и bitmap+graphics

Вопрос: 2 вопроса:Measurestring и bitmap+graphics Добавлено: 10.04.10 15:06

Автор вопроса: D o c a l | Web-сайт: www.doc-source.pp.net.ua/ | ICQ: 408802757

1)Как точно измерить ширину текста в vb.net? measurestring ошибается причем очень сильно.

2)

Dim bmp As New Bitmap(30, 20)
Dim i, j, sum As Integer
Dim grFront As Graphics

grFront = Graphics.FromImage(bmp1)

grFront.DrawString("778", stringFont, Brushes.Black, 0, 0)

        For i = 0 To 29
            For j = 0 To 19
                If bmp1.GetPixel(i, j).r <> 0 Then MsgBox(bmp1.GetPixel(i, j).A)

            Next
        Next


почему гетпиксел всегда возвращает ноль? то есть битмап пуст
Ответить

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

Номер ответа: 1 Автор ответа: BG(Алексей) Вопросов: 26 Ответов: 295	Профиль \| Цитата \| #1	Добавлено: 10.04.10 16:04
	Dim bmp As New Bitmap(30, 20) ...... grFront = Graphics.FromImage(bmp1) Найди одно отличие с одного раза. Ответить

Номер ответа: 2 Автор ответа: BG(Алексей) Вопросов: 26 Ответов: 295	Профиль \| Цитата \| #2	Добавлено: 10.04.10 16:08
	Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim bmp As New Bitmap(30, 20) Dim i, j As Integer Dim grFront As Graphics grFront = Graphics.FromImage(bmp) grFront.DrawString("778", Me.Font, Brushes.Black, 0, 0) For i = 0 To 29 For j = 0 To 19 If bmp.GetPixel(i, j).R <> 0 Then MsgBox(bmp.GetPixel(i, j).A) Next Next Me.BackgroundImage = bmp End Sub Ответить

Номер ответа: 3 Автор ответа: *D o c a l* ICQ: 408802757 Вопросов: 76 Ответов: 985	Web-сайт: www.doc-source.pp.net.ua/ Профиль \| Цитата \| #3	Добавлено: 10.04.10 17:35
	сори bmp1 я уже заменил когда на форум вставлял..у мя все норм в коде Все ровно оно не работает Где меня клемануло?или я что то не понимаю?? Ответить

Номер ответа: 4 Автор ответа: BG(Алексей) Вопросов: 26 Ответов: 295	Профиль \| Цитата \| #4	Добавлено: 10.04.10 23:51
	Что ты не понимаешь? Какой по твоему должен быть цвет у черной кисти? Замени Brushes.Black на Brushes.Red и будет тебе счастье. Ответить

Номер ответа: 5 Автор ответа: *D o c a l* ICQ: 408802757 Вопросов: 76 Ответов: 985	Web-сайт: www.doc-source.pp.net.ua/ Профиль \| Цитата \| #5	Добавлено: 11.04.10 11:58
	Спасиба Ответить

Страница: 1 |