| Вопрос: e.Graphics | Добавлено: 20.04.04 10:11 |
Автор вопроса:  Smith | ICQ: adamis@list.ru |
|
Как можно нарисовать квадрат при нажатии на кнопку, если форма уже отображена? |
| Ответы | Всего ответов: 7 |
|
Номер ответа: 1 Автор ответа: Павел Администратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #1 | Добавлено: 20.04.04 10:37 |
|
Объект Graphics получаю через Me.CreateGraphics Дальше рисуй, что надо... |
||
|
Номер ответа: 2 Автор ответа: ПавелАдминистратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #2 | Добавлено: 20.04.04 10:38 |
|
Да, ещё добавлю... Всю прорисовку форм рекомендуется выполнять в обработчике события Paint. |
||
|
Номер ответа: 3 Автор ответа: Maxik Вопросов: 58 Ответов: 201 |
Профиль | | #3 | Добавлено: 20.04.04 11:30 |
|
Что-то типа: Dim g as graphic=me.creategraphic g.drawrectangle(x,y,w,h)'здесь много перегруженных методов, выберешь, какой нужно. g.dispose |
||
|
Номер ответа: 4 Автор ответа: SmithICQ: adamis@list.ru Вопросов: 153 Ответов: 3632 |
Профиль | | #4 | Добавлено: 20.04.04 14:19 |
|
Спасибо! Извените за тупой вопрос! |
||
|
Номер ответа: 5 Автор ответа:  freeloader ICQ: 50804884 Вопросов: 72 Ответов: 642 |
Web-сайт: Профиль | | #5 | Добавлено: 27.04.04 10:06 |
|
Коль уж тут тема по рисованию, я задам свой вопрос: Ну нарисовал я лини на Пиктюре, все просто гуд, но стоит только форме, оказаться за другой формой, как все что было нарисовано пропадает, как с этим можно справиться??? |
||
|
Номер ответа: 6 Автор ответа: ПавелАдминистратор ICQ: 326066673 Вопросов: 368 Ответов: 5968 |
Web-сайт: Профиль | | #6 | Добавлено: 27.04.04 11:33 |
|
Нужно создать объект Bitmap. Я для рисования на PictureBox использую такую функцию. Она возвращает Graphics, созданный на основе Bitmap. Public Function GetGraphicsObject(ByVal pic As PictureBox) As Graphics Dim bmp As Bitmap bmp = New Bitmap(pic.Width, pic.Height) pic.Image = bmp Dim G As Graphics G = Graphics.FromImage(bmp) Return G End Function |
||
|
Номер ответа: 7 Автор ответа: ШевТ ICQ: 165728420 Вопросов: 1 Ответов: 96 |
Профиль | | #7 | Добавлено: 04.05.04 00:15 |
|
Павел, круто! А вообще, держи в памяти переменную булевского типа. При нажатии кнопки ее будет присвоено значение ИСТИНА. И в событии Paint создай ветвление: Dim КнопкаНажата As Boolean If КнопкаНажата = True Then e.Graphics.DrawRectangle(0, 0, 100, 100) ' К примеру EndIf |
||
Страница: 1 |