Окружность - Форум «Всё о Паскале»

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Окружность

Опции

Cheburashka	10.06.2010 7:39 Сообщение #1
Бывалый Группа: Пользователи Сообщений: 195 Пол: Мужской Реальное имя: Сергей Репутация: 2	Как в Delphi нарисовать окружность на канве??? Обычным уравнением x^2+y^2=R^2, ничего не получается. -------------------- ♣♣♣ "Себя великим не считай, гордясь величьем предков, Величья не добудешь ты и золота ценою! Хоть светит на небе луна, но отраженным светом - Чужою славой не живи, не будь второй луною!!!" ♣♣♣

Ответов

Cheburashka	10.06.2010 8:21 Сообщение #2
Бывалый Группа: Пользователи Сообщений: 195 Пол: Мужской Реальное имя: Сергей Репутация: 2	Спасибо, уже разобрался alpha := alpha + b; x:=200 + Round(Cos(alpha) * r); y:=200 + Round(Sin(alpha) * r); -------------------- ♣♣♣ "Себя великим не считай, гордясь величьем предков, Величья не добудешь ты и золота ценою! Хоть светит на небе луна, но отраженным светом - Чужою славой не живи, не будь второй луною!!!" ♣♣♣

Сообщений в этой теме

Сергей Меркурьев Окружность 10.06.2010 7:39

Сергей Меркурьев Спасибо, уже разобрался :) alpha := alpha + b; ... 10.06.2010 8:21

Lapp Как в Delphi нарисовать окружность на канве??? Обы... 10.06.2010 8:26

Сергей Меркурьев Вообще я хотел просто с помощью пормул нарисовать ... 10.06.2010 8:46

Lapp начал вычислять Y по уравнению: y=sqrt (sqr®-sqr(x... 10.06.2010 9:02

volvo Сергей Меркурьев Знаешь, что такое полярная систем... 10.06.2010 9:06

Lapp Вот и все сложности. И никаких проблем с разными ч... 10.06.2010 9:13

TarasBer > Но все равно интересно разобраться - можно же... 10.06.2010 9:38

Сергей Меркурьев Показать код к сожалению уже не могу :) Но было ... 10.06.2010 12:29

TarasBer Повторяю. Гуглить по фразе "Алгоритмы Брезен... 10.06.2010 13:01

1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)

Пользователей: 0

Режим отображения: Переключить на: Стандартный · Переключить на: Линейный · Древовидный

22.06.2025 17:40

Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"