Скачать: CL | DM;

Как заставить Shape двигаться по окружности?   Найти похожие ветки 

← →
Евгения   (2004-04-10 21:25) [0]

subj

---

← →
TButton ©   (2004-04-10 21:26) [1]

руками и да поможет тебе таймер =)

---

← →
Анатолий Ксюндзский   (2004-04-10 21:35) [2]

> руками и да поможет тебе таймер =)

и синус с косинусом ;)

---

← →
TButton ©   (2004-04-10 21:37) [3]

>и синус с косинусом ;)

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

---

← →
Евгения   (2004-04-10 21:46) [4]

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

---

← →
TButton ©   (2004-04-10 21:58) [5]

люблю помогать бедным девушкам =)
x:=cx+Cos(ang)*r;
y:=cy+Sin(ang)*r;
примечание:
x - Shape1.Left
y - Shape1.Top
cx, cy - координаты центра обращения (центра окружности)
ang - угол поворота в радианах (DegToRad), меняй по таймеру
r - радиус обращения
Sin, Cos - тригонометрические функции

---

← →
Анатолий Ксюндзский   (2004-04-10 22:55) [6]

> люблю помогать бедным девушкам =)
> x:=cx+Cos(ang)*r;
> y:=cy+Sin(ang)*r;
> примечание:
> x - Shape1.Left
> y - Shape1.Top
> cx, cy - координаты центра обращения (центра окружности)
> ang - угол поворота в радианах (DegToRad), меняй по таймеру
> r - радиус обращения
> Sin, Cos - тригонометрические функции

Я добавлю:
:= — конструкция "присвоить значение"
+  — сумма
* — произведение

---

← →
TButton ©   (2004-04-10 23:25) [7]

---оффтопик---
а еще я люблю, когда девушки двигают своими Shape"ами по окружности... но это уже совсем другая история.
---оффтопик---

---

← →
Fay ©   (2004-04-10 23:27) [8]

Правильно так 8)
<оффтопик>
</оффтопик>

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c