Версия для печати темы

Автор: Sensitive 23.05.2007 17:40

Скажите пожалуйста,как сделать такие фигуры как на рисунке(рисунок прилагается) с помощью PieSlice. Какие должны быть значения параметров StartAngle, EndAngle. Не пойму никак...


Эскизы прикрепленных изображений

Автор: volvo 23.05.2007 17:57

Одним вызовом не получится... Если тебя устроит без окантовки, то:

    x := 100; y := 100;
    setfillstyle(solidfill, red);
    setcolor(red);
    pieslice(x, y, 270, 360, Radius);
    pieslice(x, y, 0, 180, Radius);

Если же надо еще обвести фигуру другим цветом -

    x := 100; y := 100;
    setfillstyle(solidfill, red);
    setcolor(red);
    pieslice(x, y, 270, 360, Radius);
    pieslice(x, y, 0, 180, Radius);

    { добавляешь }
    setcolor(white);
    Arc(x, y, 270, 360, Radius);
    Arc(x, y, 0, 180, Radius);
    moveto(x - radius, y);
    lineto(x, y);
    lineto(x, y+radius);

(вторая фигура строится по аналогии)

Автор: Sensitive 23.05.2007 18:44

Спасибо, volvo, теперь понятно.