![]() |
![]() |
Jekaterina |
![]()
Сообщение
#1
|
Пионер ![]() ![]() Группа: Пользователи Сообщений: 61 Пол: Женский Реальное имя: Jekaterina Lauce Репутация: ![]() ![]() ![]() |
Здравствуйте! Я хотела бы узнать, как написать программу-раскраску - например, ребенок выбирает картинку и с помощью палитры ее раскрашивает в различные цвета. В интернете часто встречаются ява-япплеты, есть, правда, и программа Раскрашка. Но мне хотелось бы придумать что-то простое самой. Можно ли такую программу написать с помощью визуального бейсика? Как можно задать возможность раскрашивать отдельные области рисунка? Заранее спасибо за идеи.
|
![]() ![]() |
klem4 |
![]()
Сообщение
#2
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
Цитата Я как раз хотела бы щелчком - мои дочки до большего не доросли smile.gif . Я немного разбираюсь в Дельфи, но не понимаю, как описывается такое закрашивание. У класса TCanvas есть такой метод: FloodFill(x, y: Integer; Color: TColor; FillStyle: TFillStyle); Он производит заливку канвы текущей кистью, если FillStyle = fsSurface, заливка распространяется на все соседние точки от (x, y) с цветом Color. Если FillStyle = fsBorder, заливка прекращается на точках с цветом Color. Это конечно в случае если контурный рисунок выполнен на канве. -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
![]() ![]() |
![]() |
Текстовая версия | 8.07.2025 8:00 |