Difference between revisions of "RotatePoint"
From SCAR Divi Manual
(→Example) |
|||
| Line 14: | Line 14: | ||
var | var | ||
p: TPoint; | p: TPoint; | ||
| + | |||
begin | begin | ||
p := RotatePoint(Point(1, 1), Point(0, 0), Pi / 2); | p := RotatePoint(Point(1, 1), Point(0, 0), Pi / 2); | ||
Latest revision as of 17:51, 3 November 2011
Definition
function RotatePoint(const Point, Center: TPoint; const Angle: Extended): TPoint;
Availability
SCAR Divi 3.28 > Current
Description
Rotates a given TPoint Point around a TPoint Center by an angle defined in radians in Angle.
Example
var p: TPoint; begin p := RotatePoint(Point(1, 1), Point(0, 0), Pi / 2); WriteLn(IntToStr(p.X) + ',' + IntToStr(p.Y)); p := RotatePoint(Point(1, 1), Point(0, 1), Pi / 2); WriteLn(IntToStr(p.X) + ',' + IntToStr(p.Y)); end.
Output:
-1,1 0,2
