преобразования в delphi

[syrga]

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

[Stilet]

Кидай на форму TChart создавай в нем Серию простой линии и вот такой код:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, TeEngine, Series, ExtCtrls, TeeProcs, Chart;

type
  TForm1 = class(TForm)
    Chart1: TChart;
    Series1: TFastLineSeries;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
var i:double;k:integer;
begin
 i:=90;
 i:=2*pi/360*i;
 Series1.XValues.Order:=loNone;
 for k:=1 to 4 do begin
  Series1.AddXY(Cos(i),Sin(i));
  i:=i+(2*pi)/3;
 end;
 Chart1.Zoomed:=true;
 Chart1.ZoomPercent(2);
end;

end.

Это как пример