Форум программистов, компьютерный форум, киберфорум
Delphi
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
3 / 3 / 0
Регистрация: 29.04.2010
Сообщений: 29

Работа с канвой

02.05.2010, 15:55. Показов 1245. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Привет, ребята. Не можете помочь мне вот с этим заданием? Зарание большое спасибо)

Имеется центральная планета П с рядом спутников, у каждого из которых свои спутники, у тех - свои и т.д. Очевидно, что каждый спутник может рассматриваться как планета с соответствующими спутниками. Изобразить на экране модель планетарной системы, подчиняющейся данному алгоритму, если уровней вложенности N, а соответствующий алгоритм изображения имеет вид:
алг Планета (арг цел x, y, рад, н, нсп, вещ к_орб, к_спут)
// х, у - координаты планеты; рад - ее радиус
// нсп - число спутников у каждой планеты
// к_спут - отношение радиуса спутника к радиусу “своей” планеты
// к_орб - то же для радиуса орбиты спутников.
нач цел i, x1, e1, вещ угол, рад_орб
если н>0 то
поз (х,у) // центр планеты
окружность (рад) // планета
рад_орб := рад*к_орб //радиус орбиты спутников
угол := 6.28 / нсп //угол между спутниками
нц для i от 1 до нсп //для каждого спутника
x1 := x + рад_орб*cos (угол*i) // координаты центра i-го спутника
у1 := y + рад_орб*sin (угол*i)
// вызываем алгоритм Планета с новыми аргументами
Планета (x1, y1, int(рад*к_спут), н-1 нсп, к_орб, к_спут)
кц
все
кон
1
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
02.05.2010, 15:55
Ответы с готовыми решениями:

Прозрачный Timage с канвой
Вопрос: есть Timage, на котором нарисован рисунок (допустим круг, залитый зелёным). И нужно сделать прозрачной всю оставшуюся область...

работа с канвой
в дельфи только начал работать дали задание все у меня получилось вывести только осталось точку нарисовать (pixels) как сделать чтобы ее...

MDI приложение с канвой
Добрый день! Делфи начал изучать сравнительно недавно! Проблема следующая: хочу рисовать на дочерней форме Form2 произвольную фигуру,...

1
0 / 0 / 0
Регистрация: 06.05.2010
Сообщений: 26
16.05.2010, 21:40
О, мне тоже эта задача нужна. Ребята кто-нибудь мне до вторника надо
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
16.05.2010, 21:40
Помогаю со студенческими работами здесь

не могу разобраться с канвой!!!
свойство image на форме стоит alClient, и когда я вставляю BitMap на канву, то та часть которая не вмещается на форму не рисуется....

Узнать, сколько пикселей занято канвой
Помогите решить задачку. На Форме падают фигуры и рысуют около себя элипсы, нужно узнать сколько пикселей зарисованно конвой и сколько...

Работа с нарисованной канвой в Bitmap и отображение результата в picturebox
Здравствуйте, возникла проблема с Bitmap. Я рисую что либо на pictureBox, затем я хочу по цвету пикселя перекрашивать его в определенные...

Действия с канвой
Здравствуйте, при помощи канвы нарисовал два прямоугольника <!DOCTYPE html> <!--html5--> <html> <head> ...

рисую дерево канвой
Добрый вечер. У меня следующий вопрос: Пытаюсь нарисовать дерево с помощью канвы, но это надо сделать с помощью рекурсии. Сколько не...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизита табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита "ПричинаСписания". . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
Программная установка даты и запрет ее изменения
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .
Вывод данных в справочнике через динамический список
Maks 01.04.2026
Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Программное заполнения текстового поля в реквизите формы документа
Maks 01.04.2026
Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru