ImageField.Ellipse(X, Y, X1, Y1, Width : Integer; Angle : Float; Color : Integer)
Нарисовать окружность или эллипс.

Метод ImageField.Ellipse рисует окружность или эллипс вписанный в прямоугольник с координатами (X, Y) - (X1, Y1), толщиной Width пикселей и цветом Color. Эллипс можно повернуть на угол Angle радиан.

Пример:

Procedure OnCreate;
Begin
  Img.Resize(256, 256);
  Img.Ellipse(25, 25, 239, 239, 0, 0, 0xFFFFFF);
  Img.Ellipse(75, 25, 189, 239, 0, 0, 0xFFFFFF);
  Img.Ellipse(77, 27, 190, 240, 0, Pi*2/3, 0xFFFFFF);
  Img.Ellipse(77, 28, 190, 241, 0, -Pi*2/3, 0xFFFFFF);
  Img.Ellipse(95, 95, 169, 169, 8, 0, 0x60A0FF);
End;                  

Результат работы:

Смотри: Кодирование цвета.

© RTIT