Помогите

[staryy]

есть координати трёх точек(x,y,z), нада построить трёхмерний треугольник, никак не получается а срочно нада, пожалуйста не шлите учить OpenGL , так как не успею!

[DeDoK]

вот есть код для создания треугольника, но я незнаю поможет ли он(

procedure Make3Angle(Width, Height : integer; var points:array of TPoint);
begin
points[0].x:=0;
points[0].y:=height-1;
points[1].x:=width div 2;
points[1].y:=0;
points[2].x:=width-1;
points[2].y:=height-1;
end;

Пример использования

procedure TForm1.FormCreate(Sender:TObject);
var
points: array[0..5] of TPoint;
begin
Make3Angle(Button1.Width, Button1.Height,  points);
end;