Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.96/26: Рейтинг темы: голосов - 26, средняя оценка - 4.96
Серж

Как закрасить сектор окружности?

29.10.2007, 08:09. Показов 5009. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Рисую окружность, выделяю сектор. Вопрос: как его закрасить?
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
29.10.2007, 08:09
Ответы с готовыми решениями:

Подскажите, каким образом закрасить определенным цветом внутри окружности?
Здравствуйте! Подскажите, каким образом закрасить определенным цветом внутри окружности, полученной методом Curcle? Добавлено через 24...

Закрасить сектор круга
Здравствуйте, Есть один вопрос небольшой Как можно закрасить каждый созданный сектор круга случайным цветом? uses graphabc; ...

Вывести на экран монитора круговой сектор и закрасить его зеленым цветом
Вывести на экран монитора круговой сектор и закрасить его зеленым (Green) цветом с наклонным заполнением (LtSlashFill), ...

4
0 / 0 / 0
Регистрация: 22.06.2007
Сообщений: 176
29.10.2007, 17:16
Да ... вопрос конечно интересный.
Помотрел - действительно, стандартных средств не нашел.
Если-уж очень очень нада, то могу предложить два решения.
1. Используй DirectX
2. Есть несколько рекурсивных алгоритмов заполнения. А так как у тебя выпуклая фигура - их можна модернизировать, до более-менее приемлимой скорости. (Хотя рак это конечно, но ... решать тебе)
0
0 / 0 / 0
Регистрация: 29.10.2007
Сообщений: 6
29.10.2007, 17:21
Положи на форму и кликни
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub Form_Click()
'Рисуем круг в пределах формы
wd = Me.ScaleWidth: ht = Me.ScaleHeight
If wd < ht Then r = 0.45 * wd Else r = 0.45 * ht
Me.FillStyle = 0
Me.FillColor = vbGreen ' делаем зеленое заполнение
Me.Circle (wd / 2, ht / 2), r
'заливку сектора делаем концентрическими дугами
'подлый VB не дает заливать ничего, кроме кругов и прямоугольников
For i = 1 To r
Me.Circle (wd / 2, ht / 2), i, vbRed, 0, 1.571 ' вместо 0 и 1.571 поставь че надо
Next i
' наслаждайся
End Sub
0
0 / 0 / 0
Регистрация: 22.06.2007
Сообщений: 176
29.10.2007, 17:23
Можно ...
Токо коэфициент подобрать нада. Чтоб дырок небыло.
0
0 / 0 / 0
Регистрация: 29.10.2007
Сообщений: 6
31.10.2007, 23:29
Да! Проблема с дырками решается просто - надо увеличить ширину линии:
Form1.DrawWidth=2 ' или 3-4, смотря какое разрешение монитора.Для 800х600 хватает 2
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
31.10.2007, 23:29
Помогаю со студенческими работами здесь

Нарисовать сектор окружности
Помогите нарисовать сектор окружности. (любой)

Нарисовать сектор окружности
необходимо нарисовать сектор окружности. для этого обычно используется процедура pie. но надо чтоб сектор был углом вверх. процедура...

Как создать Полукруг/Сектор круга/Кольцо/Сектор кольца
Кто-нибудь знает как создать в WPF Полукруг/Сектор круга/Кольцо/Сектор кольца? Круг создаю из rectangle, но как сделать сектор круга не...

Разделить круг на 2, 3, 4, 5 секторов в зависимости от выбора радиокнопок, каждый полученный сектор следует закрасить в разные цвета.
Создать программу Delphi, которая позволит разделить круг на 2, 3, 4, 5 секторов в зависимости от выбора радиокнопок, каждый полученный...

Изобразить эллиптический сектор и закрасить его синим цветом с заполнением редкими точками, цвет фона экрана белый
Вывести на экран монитора эллиптический сектор и закрасить его синим (Blue) цвету с заполнением жидкими точками (WideDotFill), цвет...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru