Графика Делфи

[Vova777]

1. Можно ли повернуть прямоугольник, нарисованный канвой на форме на любой угол. Или даже сначала повернуть, а потом вывести?
2. Как позиционировать прямоугольник по его центру, а не по левому верхнему углу? С учетом того, что он повернут на определенный угол, т.е. поворачивать прямоугольник относительно его центра.

P.S. прямоугольник неизвестного заранее размера. лучше примерчик кода

[Valio]

Ходят слухи, что можно. Для начала опиши поворот математически на листочке... а перевести в код это без проблем.

[Vova777]

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

Ходят слухи, что можно. Для начала опиши поворот математически на листочке... а перевести в код это без проблем.

А по-подробнее про листочек, это как? С тригонометрией я не в ладах

[Valio]

Ну листочек это просто листочек
Тетрадный листочек, формата А4 дял принтера и пр.
Взять ручку и подумать как можно вычислить координаты точек при повороте.

[Selestis]

1) Гугли: "Матрица поворота". Можно из википедии.
2) То же самое только поворачивать будешь относительно центра.

[Vova777]

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

1) Гугли: "Матрица поворота". Можно из википедии.
2) То же самое только поворачивать будешь относительно центра.

А позиционировать по центру как, если заранее не известен размер? Что-то типа вот этого:
...
x:= 100;
y:= 100; //координаты центра
...
x1:= x div 2;
y1:= y div 2;
x2:= x1 + "73"; (например)
y2:= y2 + "5"; (например) //второй угол, ну здесь динамической переменной размер задать можно
...
//здесь считать "матрицу поворота"
...
Form6.Image1.Canvas.Rectangle(x1, y1,x2, y2);
...

Что-то не понял матрицу, там как считать вообще?

[Selestis]

Есть у вас W,H - размер. Cx,Cy - центр. Alpha - угол поворота.
Ваш прямо-ик выглядит сначала так:
-_______
|---.----|
|_______|
Точка - центр. Есть 4 вершины, найти координаты которых ОТНОСИТЕЛЬНО центра элементарно. То есть есть 4 вектора от центра к вершине: A1x,A1y...A4x,A4y
Вот их-то и будем поворачивать по матрице поворота:
M=(cos(Alpha),-sin(Alpha),
sin(Alpha),cos(Alpha))
После трансформации эти вектора ессно изменятся и останется прибавить к позиции центра координаты этих векторов.

-/-\
/-.-\
\---/
-\-/

Ах да, Alpha:= - Alpha

И рисовать, разумеется, придётся уже не Rectangle, а набором линий.

[Vova777]

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

Вот их-то и будем поворачивать по матрице поворота:
M=(cos(Alpha),-sin(Alpha),
sin(Alpha),cos(Alpha))

Я формулу саму понять не могу Это так:
M=(cos(Alpha)-sin(Alpha) * sin(Alpha) * cos(Alpha)) ?

[Selestis]

M: array[1..2,1..2] of real;
M[1,1]:=cos(a);
M[1,1]:=-sin(a);
M[2,1]:=sin(a);
M[2,2]:=cos(a);

Вобщем-то это просто запись такая, можно и формулу сразу для координат вывести, но так проще. Хотя может вам и сложнее. Рискну предположить, что вам нужно посмотреть ещё материал про перемножение матрицы на вектор...

Впрочем, вот формулы координат:
a:=-a;
NewX:=x*cos(a)-y*sin(a);
NewY:=x*sin(a)+y*cos(a);