VBNet - Форум - Заливка

Вопрос: Заливка Добавлено: 07.05.04 22:47

Автор вопроса: Ujif | Web-сайт: - | ICQ: -

Как на пикчерсе реализовать заливку как в пэинте?
Ответить

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

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

sne

Разработчик Offline Client

ICQ: 233286456

Вопросов: 34
Ответов: 5445

Web-сайт: hw.t-k.ru
Профиль | | #1

Добавлено: 08.05.04 00:00

Помнится был такой вопрос, вот только не помнится кто задавал , там сказано все что только было можно...

Ответить

Номер ответа: 2
Автор ответа:

Vilya

ICQ: 232995216

Вопросов: 12
Ответов: 63

Web-сайт: нету
Профиль | | #2

Добавлено: 08.05.04 01:26

Вот я как раз от туда это и содрал:

1. Кидаем пикчубокс (Pic1) и две кнопки (Command1 и Command2)

2. В коде

Private Declare Function FloodFill Lib "gdi32" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal crColor As Long) As Long

Private Sub Command1_Click()

Pic1.ScaleMode = 3 'pixel

Pic1.Line (10, 10)-(10, 50), 0

Pic1.Line -(60, 70), 0

Pic1.Line -(20, 50), 0

Pic1.Line -(80, 30), 0

Pic1.Line -(10, 10), 0

End Sub

Private Sub Command2_Click()

Pic1.FillStyle = 0 ' Выбираем кисть

FloodFill Pic1.hdc, 25, 25, 0 'Закрашиваем

End Sub

Ответить

Номер ответа: 3
Автор ответа:

Ujif

ICQ: -

Вопросов: 52
Ответов: 76

Web-сайт: -
Профиль | | #3

Добавлено: 12.05.04 22:25

А как узнать цвет линии по которую будет идти заливка

Ответить

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

sne

Разработчик Offline Client

ICQ: 233286456

Вопросов: 34
Ответов: 5445

Web-сайт: hw.t-k.ru
Профиль | | #4

Добавлено: 12.05.04 22:33

А зачем цвет лигии ? лучше брать цвет под курсором, с которого места заливку будем производить... и далее попиксельно сравнивать цвета и если совпадают - заливать, если нет,- обходить...

Ответить

Номер ответа: 5
Автор ответа:

Ujif

ICQ: -

Вопросов: 52
Ответов: 76

Web-сайт: -
Профиль | | #5

Добавлено: 13.05.04 22:25

Это то я знаю но не долго ли это будет?

Ответить

Номер ответа: 6
Автор ответа:

sne

Разработчик Offline Client

ICQ: 233286456

Вопросов: 34
Ответов: 5445

Web-сайт: hw.t-k.ru
Профиль | | #6

Добавлено: 13.05.04 23:21

Долго... но на сколько я зная АПИ такой нет поэтому лучше написать dll'ку на С, ну если совсем приспичит - на асьме... помнится был пример использования асьма в VB, там прямо HEX кодами функции вставлялись... и оччень неплохо с графикой работалось... даже вполне шустро...

Ответить

Номер ответа: 7
Автор ответа:

Ujif

ICQ: -

Вопросов: 52
Ответов: 76

Web-сайт: -
Профиль | | #7

Добавлено: 16.05.04 17:57

to sne: А не знаеш где этот пример может быть?

Ответить

Номер ответа: 8
Автор ответа:

sne

Разработчик Offline Client

ICQ: 233286456

Вопросов: 34
Ответов: 5445

Web-сайт: hw.t-k.ru
Профиль | | #8

Добавлено: 17.05.04 01:20

Вот попробуй: http://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=40386&lngWId=1
но сразу же оговорюсь, там не заливка, там просто очень шустрая работа на ВБ, с помощью АСМ'а (nasm)

Ответить

Страница: 1 |