Как задать треугольник?

[Shevali]

Подскажите, как задать в Паскале треугольник.
А то в учебнике показаны как рисовать только круг, линию, точку и прямоугольник.
И можно ли рисовать неправильные прямоугольники (например, трапецию или ромб)?
Спасибо.

[Levsha100]

Последовательно соединяйте точки(MoveTo;LineTo), а потом если надо заливайте, примеры есть в хелпе.

[OCTAGRAM]

Есть DrawPoly и FillPoly.
Как ими пользоваться, можно посмотреть исходник DOM.PAS.

[Shevali]

Понимаете, ещё месяц не прошёл, как я впервые открыл учебник по Паскалю, а раздел графика начал изучать несколько дней назад (да и то по вечерам). Поэтому нельзя ли чуть проще, приведите пример, хотя бы строку, где задаётся этот самый треугольник. (вот например, прямоугольник задаётся rectangle(x,y,z,f)). А как треугольник?

[OCTAGRAM]

Например, использование DrawPoly выглядит так:

procedure DrawTriangle(X1, Y1, X2, Y2, X3, Y3 : Integer);
var Points: array[1 .. 8] of Integer;
begin
  Points[1] := X1;
  Points[2] := Y1;
  Points[3] := X2;
  Points[4] := Y2;
  Points[5] := X3;
  Points[6] := Y3;
  Points[7] := X1;
  Points[8] := Y1;
  DrawPoly(4, Points);
end;

аналогично FillPoly