написать что то вроде графического редактора

@Slaff4ik · Регистрация: 29.09.2011

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

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

@Puporev · 29.07.2012, 18:34

Сообщение от Slaff4ik

а в произвольном месте не могу додуматься

Что значит в произвольном? В случайно выбранном месте окна?

@Slaff4ik · 29.07.2012, 21:04 **[ТС]**

ну да.в смысле есть область для рисования, и в любой точке этой области должен нарисоваться элемент

@Puporev · 29.07.2012, 21:14

Вроде так.

x1,y1-левый верхний угол области
x2,y2-правый нижний
w,h-ширина и высота объекта
x,y-координаты центра фигуры
.............................
x:=random(x2-x1-w)+w div 2;
y:=random(y1-y2-h)+h div 2;

@Slaff4ik · 29.07.2012, 21:20 **[ТС]**

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

@Puporev · 29.07.2012, 21:22

Интересно как это Вы хотите рандомно раскидать элементы интерьера? Чушь получится.
У меня такой программы точно нет.

@Slaff4ik · 29.07.2012, 21:38 **[ТС]**

так не рандомно же.они должны располагаться в тех местах где я щелкаю на экране

@Puporev · 29.07.2012, 21:45

Так это совсем другое, при чем здесь случайное распределение? Это тоже самое что и задать координаты.

@Puporev · 29.07.2012, 22:12

Вот я набросал принцип рисования фигур в точке, выбранной курсором мыши.

Pascal
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
//рисование круга
procedure Krug(x,y:integer;cv:TCanvas);
begin
 with cv do
  begin
   pen.Color:=clBlue;
   brush.Color:=clBlue;
   ellipse(x-20,y-20,x+20,y+20);
  end;
end;
//рисование треугольника
procedure Treug(x,y:integer;cv:TCanvas);
begin
 with cv do
  begin
   pen.Color:=clRed;
   moveto(x-20,y+20);
   lineto(x,y-20);
   lineto(x+20,y+20);
   lineto(x-20,y+20);
   brush.Color:=clRed;
   floodfill(x,y,clRed,fsBorder);
  end;
end;
//рисование квадрата
procedure Square(x,y:integer;cv:TCanvas);
begin
 with cv do
  begin
   pen.Color:=clGreen;
   brush.Color:=clGreen;
   rectangle(x-20,y-20,x+20,y+20);
  end;
end;
procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  if Button = mbLeft  // нажата левая кнопка
  then
   begin
    if RadioButton1.Checked then Krug(x,y,Canvas)
    else if RadioButton2.Checked then Treug(x,y,Canvas)
    else if RadioButton3.Checked then Square(x,y,Canvas)
   end;
end;

@Puporev · 29.07.2012, 22:15

Если нужно не по нажатию кнопки, а по отпусканию, то тогда вызывайте метод OnMouseUp

Delphi
1
 procedure FormMouseUp

@Slaff4ik · 30.07.2012, 00:30 **[ТС]**

ох спасибо огромное)

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@Slaff4ik 0 / 0 / 0 Регистрация: 29.09.2011 Сообщений: 18

	написать что то вроде графического редактора 29.07.2012, 18:15. Показов 1769. Ответов 10 Метки нет (Все метки) нужно написать такой редактор. есть разные элементы типа окно, стена, светильник.я нажимаю на одну из кнопок, напрмер светильник, и на затем на любую точку в области рисования, и в этой точке появляется этот элемент. я умею делать чтобы при нажатии кнопки в заданных координатах появлялся элемент, а в произвольном месте не могу додуматься, подскажите что нибудь 0

@Slaff4ik 0 / 0 / 0 Регистрация: 29.09.2011 Сообщений: 18
	29.07.2012, 21:04 [ТС]
	ну да.в смысле есть область для рисования, и в любой точке этой области должен нарисоваться элемент 0

@Puporev Почетный модератор 64314 / 47610 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	29.07.2012, 21:14
	Вроде так. x1,y1-левый верхний угол области x2,y2-правый нижний w,h-ширина и высота объекта x,y-координаты центра фигуры ............................. x:=random(x2-x1-w)+w div 2; y:=random(y1-y2-h)+h div 2; 1

@Slaff4ik 0 / 0 / 0 Регистрация: 29.09.2011 Сообщений: 18
	29.07.2012, 21:20 [ТС]
	спасибо)а вообще в идеале должно получиться что то вроде интерьера.стены стены, окна, светильники, все это нужно как бы расставить.если есть что то подобное где то подскажите пожалуйста 0

@Puporev Почетный модератор 64314 / 47610 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	29.07.2012, 21:22
	Интересно как это Вы хотите рандомно раскидать элементы интерьера? Чушь получится. У меня такой программы точно нет. 1

@Slaff4ik 0 / 0 / 0 Регистрация: 29.09.2011 Сообщений: 18
	29.07.2012, 21:38 [ТС]
	так не рандомно же.они должны располагаться в тех местах где я щелкаю на экране 0

@Puporev Почетный модератор 64314 / 47610 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	29.07.2012, 21:45
	Так это совсем другое, при чем здесь случайное распределение? Это тоже самое что и задать координаты. 0

@Slaff4ik 0 / 0 / 0 Регистрация: 29.09.2011 Сообщений: 18
	30.07.2012, 00:30 [ТС]
	ох спасибо огромное) 0