Нарисовать прямоугольник, который заполняется разноцветными шариками - PascalABC.NET

PascalABC.NET

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.50/8:

@Gladius6 1 / 1 / 2 Регистрация: 23.02.2014 Сообщений: 56

	Нарисовать прямоугольник, который заполняется разноцветными шариками 18.03.2014, 17:19. Показов 1655. Ответов 2 Метки нет (Все метки) Нарисовать прямоугольник, который заполняется разноцветными шариками. 0

Лучшие ответы (1)

Сообщение: #5917620

IT_Exp

Эксперт

34794 / 4073 / 2104

Регистрация: 17.06.2006

Сообщений: 32,602

Блог

18.03.2014, 17:19

Ответы с готовыми решениями:

Графика: Нарисовать прямоугольник который крутится вокруг одной из своих вершин
Нарисовать прямоугольник который крутится вокруг одной из своих вершин.

Нарисовать ёлку с шариками и гирляндой. Гирлянда должна переливаться разноцветными огоньками
Нарисовать ёлку с шариками и гирляндой. Гирлянда должна переливаться разноцветными огоньками. Добавлено через 18 минут Очень надо)))

Нарисовать прямоугольник, который движется по синусоиде вдоль экрана
Нарисовать прямоугольник, который, вращаясь вокруг своего центра, движется по синусоиде вдоль экрана.

pavelDev

56 / 56 / 26

Регистрация: 13.11.2013

Сообщений: 234

Записей в блоге: 1

18.03.2014, 18:15

Сообщение было отмечено Gladius6 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
uses graphabc,abcobjects;
var r:RectangleABC;
begin
R:=new RectangleABC(120,100,400,300);
for var i:=1 to Random(300,600) do
begin
graphabc.SetPenColor(clRandom);
SetBrushColor(clRandom);
Circle(Random(160,480),Random(140,370),Random(20,30))
end;
end.

@Gladius6 1 / 1 / 2 Регистрация: 23.02.2014 Сообщений: 56
	18.03.2014, 18:37 [ТС]
	pavelDev, Спасибо! 0

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

BasicMan

Эксперт

29316 / 5623 / 2384

Регистрация: 17.02.2009

Сообщений: 30,364

Блог

18.03.2014, 18:37

Помогаю со студенческими работами здесь

Нарисовать прямоугольник со сторонами 20 и 30 пикселей, который движется по кругу
Прямоугольник со сторонами 20 и 30 пикселей движется по кругу диаметром 220 пикселей, не меняя ориентации и меняя окраску на каждом витке.

Нарисовать на экране прямоугольник желтого цвета, который движется по горизонтали
Нарисовать на экране прямоугольник желтого цвета, который движется по горизонтали, в прямом и обратном направлении, и за ним тянется «след»...

Нарисовать квадрат, который постепенно растягивается по вертикали, превращаясь в прямоугольник
Нарисовать квадрат, который постепенно растягивается по вертикали, превращаясь в прямоугольник, а затем сжимается обратно в квадрат,...

Нарисовать прямоугольник, который вращается вокруг своего центра (код не работает правильно)
Мой код не работает правильно. Помогите, как это реализовать? ...

Нарисовать прямоугольник, внутри него квадрат, который движется вдоль стен прямоугольника
Нарисовать прямоугольник, внутри него квадрат, который движется вдоль стен прямоугольника.

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

Или воспользуйтесь поиском по форуму:

Опции темы

Новые блоги и статьи Все статьи Все блоги /
Валидация и контроль данных табличной части документа перед записью Maks 22.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .	Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .	Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .	Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .

Наверх