совет по ооп Delphi 7

@dyozik · Регистрация: 03.12.2011

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

Задание такое:Реализовать программу сбора елки из треугольников. Используя объектные структуры, создать 6 треугольников разного размера. Предусмотреть:
1. Возможность перемещения треугольников по окну.
2. При правильной сборке елки (треугольники размещены сверху вниз в порядке увеличе-ния размера) выдается сигнальное сообщение.
Может кто-нибудь делал что-то подобное или поделиться ссылкой на решение похожего задания.
Или просто подскажите как реализовать перемещение треугольников.

@Arcor · 03.12.2011, 16:21

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

@dyozik · 03.12.2011, 16:28 **[ТС]**

В том-то и дело, что перемещение должно быть вместе с мышкой(как карты в пасьянс-косынске). Мне говорили, что на каком-то компоненте это будет проще делать, так как там есть drag'n'drop.

@spydark91 · 03.12.2011, 17:06

перемещение сделать очень просто
если треугольники shape,например,то по событию mousedown запоминаем координаты курсора и включаем перепенную булеву(true). на событие mousemoove пишем чтобы треугольник(лефт и топ) двигались за курсором - те координаты которые мы запомнили,и при отпускании вырубаем булеву переменную

@dyozik · 03.12.2011, 17:08 **[ТС]**

я уже нашел этот способ в старых темах, но всё равно спасибо

@dyozik 0 / 0 / 0 Регистрация: 03.12.2011 Сообщений: 3
		1
	совет по ооп Delphi 7 03.12.2011, 15:26. Показов 1079. Ответов 4 Метки нет (Все метки) Задание такое:Реализовать программу сбора елки из треугольников. Используя объектные структуры, создать 6 треугольников разного размера. Предусмотреть: 1. Возможность перемещения треугольников по окну. 2. При правильной сборке елки (треугольники размещены сверху вниз в порядке увеличе-ния размера) выдается сигнальное сообщение. Может кто-нибудь делал что-то подобное или поделиться ссылкой на решение похожего задания. Или просто подскажите как реализовать перемещение треугольников. 0

@Arcor 5706 / 2297 / 466 Регистрация: 20.11.2009 Сообщений: 7,721 Записей в блоге: 1
	03.12.2011, 16:21	2
	я бы создал функцию, которая строит треугольник, и относительной точка была бы точка симметрии треугольника, ну в этом случае это ось у делящая треугольник на 2, удобно так потому что тебе выстраивать треугольник по центру нужно и по х взял бы основание, теперь в событии перемещения указателя мышки или клика мышки, брал бы координаты для координат треугольника, т.е. куда кликнул туда и переместил треугольник 0

@dyozik 0 / 0 / 0 Регистрация: 03.12.2011 Сообщений: 3
	03.12.2011, 16:28 [ТС]	3
	В том-то и дело, что перемещение должно быть вместе с мышкой(как карты в пасьянс-косынске). Мне говорили, что на каком-то компоненте это будет проще делать, так как там есть drag'n'drop. 0

@spydark91 86 / 86 / 13 Регистрация: 03.03.2011 Сообщений: 1,873
	03.12.2011, 17:06	4
	перемещение сделать очень просто если треугольники shape,например,то по событию mousedown запоминаем координаты курсора и включаем перепенную булеву(true). на событие mousemoove пишем чтобы треугольник(лефт и топ) двигались за курсором - те координаты которые мы запомнили,и при отпускании вырубаем булеву переменную 1

@dyozik 0 / 0 / 0 Регистрация: 03.12.2011 Сообщений: 3
	03.12.2011, 17:08 [ТС]	5
	я уже нашел этот способ в старых темах, но всё равно спасибо 0