Форум программистов, компьютерный форум, киберфорум
C# Windows Forms
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 18.12.2021
Сообщений: 11

Увеличивающиеся круги

16.01.2024, 07:39. Показов 755. Ответов 0

Студворк — интернет-сервис помощи студентам
C#
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;
 
namespace ExamСircles
{
    public partial class Form1 : Form
    { 
        List<Ball> balls = new List<Ball>();
        Graphics g;
        Pen pen = new Pen (Color.Black);
        Brush brush = new SolidBrush(Color.Black);
        int speed = 10;
        int count = 0;
 
        public Form1()
        {
            InitializeComponent();
        }
        
        private void Form1_Load(object sender, EventArgs e)
        {
            g = Drawpanel.CreateGraphics();
            Drawpanel.BackColor = Color.White;
            CounterClick.Text = "Колличество нажатий  " + count.ToString();
            SpeedText.Text = speed.ToString();
        }
 
        private void Drawpanel_MouseDown(object sender, MouseEventArgs e)
        {
            count++;
            CounterClick.Text = "Колличество нажатий  " + count.ToString();
            if (balls.Count > 0)
            {
                int indexball = CheckBallClick(e.Location);
                if (indexball >= 0)
                {
                    balls[indexball].radius += speed;
                    if (Intersection(indexball))
                    {
                        balls.Remove(balls[indexball]);
                        g.Clear(Color.White);
                        Draw();
                    }
                    else Draw();
                }
                else
                {
                    balls.Add(new Ball(e.Location));
                    if (Intersection(balls.Count - 1)) balls.Remove(balls[balls.Count - 1]);
                    else Draw();
                }
            }
            else
            {
                balls.Add(new Ball(e.Location));
                if (Intersection(0)) balls.Remove(balls[0]);
                else Draw();
            }
        }
 
        private void Draw()
        {
            foreach (Ball element in balls)
            {
                Pen pen = new Pen(element.color);
                Brush brush = new SolidBrush(element.color);
                g.DrawEllipse(pen, element.SquarePoint.X, element.SquarePoint.Y, 2 * element.radius, 2 * element.radius);
                g.FillEllipse(brush, element.SquarePoint.X, element.SquarePoint.Y, 2 * element.radius, 2 * element.radius);
            }
        }
 
         private int CheckBallClick(Point click)
         {
            for (int i = 0; i < balls.Count; i++)
            {
                if (balls[i].SquarePoint.X < click.X && balls[i].SquarePoint.X + 2 * balls[i].radius > click.X &&
                    balls[i].SquarePoint.Y < click.Y && balls[i].SquarePoint.Y + 2 * balls[i].radius > click.Y)
                    return i;
            }
            return -1;
         }
 
        private void buttonspeed_Click(object sender, EventArgs e)
        {
            speed = int.Parse(SpeedText.Text);
        }
 
        private bool Intersection(int indexball)
        {
            balls[indexball].SquarePoint = new Point(balls[indexball].center.X - balls[indexball].radius, balls[indexball].center.Y - balls[indexball].radius);
            if (balls[indexball].center.X - balls[indexball].radius > 0 && balls[indexball].center.Y - balls[indexball].radius > 0 &&
                balls[indexball].center.X + balls[indexball].radius < Drawpanel.Width && balls[indexball].center.Y + balls[indexball].radius < Drawpanel.Height)// убиарется ли на панеле?
            {
                Rectangle nowball = new Rectangle(balls[indexball].SquarePoint.X, balls[indexball].SquarePoint.Y, 2 * balls[indexball].radius, 2 * balls[indexball].radius);
                for (int i = 0; i < balls.Count; i++)
                {
                    if (i != indexball)
                    {
                        Rectangle squareball = new Rectangle(balls[i].SquarePoint.X, balls[i].SquarePoint.Y, 2 * balls[i].radius, 2 * balls[i].radius);
                        if (squareball.IntersectsWith(nowball)) return true;// пересекается ли с другими кругами?
                    }
                }
                return false;
            }
            else return true;
        }
    }
}
 
форма круги
 
 
using System;
using System.Collections.Generic;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
 
namespace ExamСircles
{
    public class Ball
    {
        public Point center;
        public int radius;
        public Point SquarePoint;
        public Color color;
        public List<Color> colors = new List<Color>() {Color.Red, Color.Blue, Color.Yellow, Color.Green, Color.Pink, Color.Purple};
        public Random random = new Random();
 
        public Ball(Point center) 
        {
            this.center = center;
            radius = 10;
            SquarePoint = new Point (center.X - radius, center.Y - radius);
            color = colors[random.Next(colors.Count)];
        }
    }
}
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
16.01.2024, 07:39
Ответы с готовыми решениями:

Создайте приложение, отображающее увеличивающиеся окружности, центры которых лежат на спирали
Создайте приложение, отображающее увеличивающиеся окружности, центры которых лежат на спирали

Круги с цифрами внутри
Здравствуйте! Помогите пожалуйста написать программу, которая бы выводила на экран небольшой круг, в котором отображались цифры от 1 до 9.

DrawEllipse. Обрезаются круги
Рисую при помощи DrawEllipse круги, но тут вот какая беда:

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
16.01.2024, 07:39
Помогаю со студенческими работами здесь

Нарисовать круги используя 2 цикла
С помощью двух циклов и команды построения эллипсов воспроизвести изображения:

Рандомно нарисовать круги на форме
Здравствуйте мне нужно написать программку про рисование кругов. Пользователь задает количество кругов и они рандомно рисуются на форме. ...

Кружащиеся круги вокруг большого круга
Подскажите как сделать один большой круг вокруг которого кружатся 3 других маленьких круга в разных эллипсоидных осях. Не нашел ничего...

Графика: Нарисовать круги рандомного радиуса в панели
Помогите разобраться с программой по графике в c sharp forms программа выводит круги рандомного радиуса в панели Можете обьснить что...

Нарисовать круги
Добрый вечер, господа, начинаю изучать C# и нужна ваша помощь Мне надо нарисовать эти круги, но чтобы я вводил кол-во этих кругов и...


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

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Очистка реквизитов документа при копировании
Maks 09.04.2026
Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru