Нарисовать восьмиугольник мышкой

@DenisssC · Регистрация: 21.12.2018

Студворк — интернет-сервис помощи студентам

Нужно создать программу, чтобы она могла рисовать восьмиугольники (именно сразу восьмиугольники) движением мыши. При движении мыши происходит изменение его размера и чтобы после создания первого была возможность создать второй и так далее. Желательно чтобы возможность рисовать появлялась при нажатии на кнопку.

Заранее огромное спасибо!!

@gunslinger · 22.12.2018, 06:23

Рисование правильного многоугольника можно взять отсюда: Рисование пятиконечной звезды - C++ Builder

Рисование с помощью мыши: Создать многоугольник из прямых

@DenisssC · 22.12.2018, 14:14 **[ТС]**

Огромное спасибо!!

@gunslinger · 23.12.2018, 13:43

Не за что.
В теме Создание фигур еще можно посмотреть, как (примерно) с помощью мыши рисовать фигуры, вписанные в квадрат (для случая правильного многоугольника), либо в прямоугольник.

@gunslinger · 23.12.2018, 19:55

Объединил весь вышеприведенный код (делал в XE5; под билдер 6 в случае чего изменить особого труда не должно составить). Можно рисовать либо правильные многоугольники, либо "деформированные" (см. функцию my_polygon).

Общий код:
cpp

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
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
  Graphics::TBitmap *Bitmap;
  Bitmap = new Graphics::TBitmap();
  Bitmap->Width = Image1->Width;
  Bitmap->Height = Image1->Height;
  Image1->Picture->Graphic = Bitmap;
}
//---------------------------------------------------------------------------
void TForm1::my_polygon (TCanvas *Canvas, TPoint TopLeft, TPoint BottomRight, int TopCount, TColor LineColor, TPenMode AMode)
{
  // Canvas - канва, на которой рисуется фигура
  // TopLeft - левый верхний угол ОРФ (области рисования фигуры)
  // BottomRight - правый нижний угол ОРФ
  // Center - центр фигуры
  // Radius - радиус (правильного многоугольника - ПМ)
  // R1, R2 - "вспомогательные" радиусы (для "деформированного" многоугольника - ДМ)
  // TopCount - кол-во вершин
  // LineColor - цвет контура
  // AMode - режим рисования
 
  // цвет контура
  Canvas->Pen->Color = LineColor;
 
  // режим рисования
  Canvas->Pen->Mode = AMode;
 
  // вычисляем радиус
//  int Radius = Min(abs(BottomRight.x - TopLeft.x)/2, abs(BottomRight.y - TopLeft.y)/2);  // ПМ
  int R1 = (BottomRight.x - TopLeft.x)/2, R2 = (BottomRight.y - TopLeft.y)/2;  // ДМ
 
  // определяем центр
  TPoint Center = Point((BottomRight.x + TopLeft.x)/2, (BottomRight.y + TopLeft.y)/2);
 
  // переходим в "начальную точку" фигуры
//  Canvas->MoveTo(Center.x+sin(0)*Radius, Center.y-cos(0)*Radius);  // ПМ
  Canvas->MoveTo(Center.x+sin(0)*R1, Center.y-cos(0)*R2);  // ДМ
 
  // рисуем вершины
  for (int i = 1; i <= TopCount; i++)
  {
//  Canvas->LineTo(Center.x+sin(i*2*M_PI/TopCount)*Radius+1, Center.y-cos(i*2*M_PI/TopCount)*Radius-1);  // ПМ
    Canvas->LineTo(Center.x+sin(i*2*M_PI/TopCount)*R1+1, Center.y-cos(i*2*M_PI/TopCount)*R2-1);  // ДМ
  }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
          int X, int Y)
{
  if (Button == mbLeft && CBDrawEnabled->Checked)  // если нажата левая кнопка мыши и отмечен чекбокс "рисовать"
  {
    Drawing = 1;
    StartPoint = Point(X, Y);
    EndPoint = StartPoint;
 
    my_polygon(Image1->Canvas, StartPoint, EndPoint, TopCount, clBlack, pmCopy);
  }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift, int X,
          int Y)
{
  if (Drawing)
  {
    my_polygon(Image1->Canvas, StartPoint, EndPoint, TopCount, clBlack, pmNotXor);
    EndPoint = Point(X, Y);
    my_polygon(Image1->Canvas, StartPoint, EndPoint, TopCount, clBlack, pmNotXor);
  }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift,
          int X, int Y)
{
  if (Drawing)
  {
    my_polygon(Image1->Canvas, StartPoint, EndPoint, TopCount, clBlack, pmCopy);
    Drawing = 0;
  }
}
//---------------------------------------------------------------------------

h

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
//---------------------------------------------------------------------------
 
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <System.Classes.hpp>
#include <Vcl.Controls.hpp>
#include <Vcl.StdCtrls.hpp>
#include <Vcl.Forms.hpp>
#include <Vcl.ExtCtrls.hpp>
#include <Math.hpp>
//---------------------------------------------------------------------------
bool Drawing;
TPoint StartPoint, EndPoint;
int TopCount = 8;
 
class TForm1 : public TForm
{
__published:    // IDE-managed Components
    TImage *Image1;
    TCheckBox *CBDrawEnabled;
    void __fastcall Image1MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
          int X, int Y);
    void __fastcall Image1MouseMove(TObject *Sender, TShiftState Shift, int X, int Y);
    void __fastcall Image1MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift,
          int X, int Y);
 
private:    // User declarations
public:     // User declarations
    __fastcall TForm1(TComponent* Owner);
    void my_polygon (TCanvas *Canvas, TPoint TopLeft, TPoint BottomRight, int TopCount, TColor LineColor, TPenMode AMode);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

@gunslinger · 23.12.2018, 20:51

Замечание: чтобы не рисовались лишние отдельные точки, когда происходит просто клик мыши без ее движения, либо отдельные тонкие вертикальные или горизонтальные линии, соответствующий код нужно изменить на этот:

C++
1
2
3
4
5
6
7
8
9
10
11
12
void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift,
          int X, int Y)
{
  if (Drawing)
  {
    if (StartPoint.x != EndPoint.x && StartPoint.y != EndPoint.y)
      my_polygon(Image1->Canvas, StartPoint, EndPoint, TopCount, clBlack, pmCopy);
    else
      my_polygon(Image1->Canvas, StartPoint, EndPoint, TopCount, clBlack, pmNotXor);
    Drawing = 0;
  }
}

Можно, при желании, дополнительно в том условии сделать проверку на минимальные размер рисуемой фигуры (чтобы она не была слишком мелкой), например:

C++
1
    if (abs(StartPoint.x - EndPoint.x) > 30 && abs(StartPoint.y - EndPoint.y) > 30)

Новые блоги и статьи Все статьи Все блоги /
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	Киев стоит - украинская песня zorxor 28.01.2026 wfWdiRqdTxc О Господи, Вечный, Ты . . . Я помоги, Бесконечный. . . Я прошу Ты. . . Я погибаю, спаси. . . Я прошу Тебя Вечный. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .	Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .

@DenisssC 0 / 0 / 0 Регистрация: 21.12.2018 Сообщений: 2

	Builder 6 Нарисовать восьмиугольник мышкой 21.12.2018, 04:02. Показов 3521. Ответов 5 Метки нет (Все метки) Нужно создать программу, чтобы она могла рисовать восьмиугольники (именно сразу восьмиугольники) движением мыши. При движении мыши происходит изменение его размера и чтобы после создания первого была возможность создать второй и так далее. Желательно чтобы возможность рисовать появлялась при нажатии на кнопку. Заранее огромное спасибо!! 0

@gunslinger place status here 3186 / 2220 / 640 Регистрация: 20.07.2013 Сообщений: 6,013
	22.12.2018, 06:23
	Рисование правильного многоугольника можно взять отсюда: Рисование пятиконечной звезды - C++ Builder Рисование с помощью мыши: Создать многоугольник из прямых 1

@DenisssC 0 / 0 / 0 Регистрация: 21.12.2018 Сообщений: 2
	22.12.2018, 14:14 [ТС]
	Огромное спасибо!! 0

@gunslinger place status here 3186 / 2220 / 640 Регистрация: 20.07.2013 Сообщений: 6,013
	23.12.2018, 13:43
	Не за что. В теме Создание фигур еще можно посмотреть, как (примерно) с помощью мыши рисовать фигуры, вписанные в квадрат (для случая правильного многоугольника), либо в прямоугольник. 0

Нарисовать восьмиугольник мышкой

Решение