Синтаксис:
procedure PieSlice(х,у: integer; УголНачала,УголКонца, Радиус: word);
Действие:
Вычерчивает сектор радиуса Радиус с центром в точке с координатами (х,у). Параметры УголНачала и УголКонца задают угловые координаты начальной и конечной точек линии окружности (в градусах), которая вычерчивается против часовой стрелки от начальной к конечной точке. Значение угловой координаты возрастает против часовой стрелки. Нулевому углу соответствует горизонтальный отрезок, проведенный из точки (х,у) в сторону
возрастания координаты х. ЕСЛИ УголНачала равен 0°, а УголКонца
равен 360°, то процедура PieSlice вычерчивает круг.
Сектор закрашивается в соответствии со стилем, заданным процедурой SetFiiisiyle, линия и границы вычерчиваются цветом, установленным процедурой setcoior.