Стандартные стили заполнения
Константа | Значение | Маска |
EmptyFill | 0 | Заполнение цветом фона |
SolidFill | 1 | Заполнение текущим цветом |
LineFill | 2 | Заполнение символами --, цвет – color |
LtslashFill | 3 | Заполнение символами // нормальной толщины, цвет – color |
SlashFill | 4 | Заполнение символами // удвоенной толщины, цвет – color |
BkslashFill | 5 | Заполнение символами \\ удвоенной толщины, цвет – color |
LtbkSlahFill | 6 | Заполнение символами \\ нормальной толщины, цвет – color |
HatchFill | 7 | Заполнение вертикально-горизонтальной штриховкой тонкими линиями, цвет – color |
XhatchFill | 8 | Заполнение штриховкой крест-накрест по диагонали «редкими» тонкими линиями, цвет – color |
InterLeaveFill | 9 | Заполнение штриховкой крест-накрест по диагонали «частыми» тонкими линиями, цвет – color |
WideDotFill | 10 | Заполнение «редкими» точками |
CloseDotFill | 11 | Заполнение «частыми» точками |
UserFill | 12 | Заполнение по определенной пользователем маске заполнения, цвет – color |
Для построения секторов можно использовать следующие процедуры:
PieSlice (x, y: integer, a, b, R: word), которая рисует и заполняет сектор круга. Координаты x, y – центр окружности, сектор рисуется от начального угла a до конечного угла b, а закрашивание происходит при использовании специальных процедур;
Sector (x, y: integer, a, b, Rx, Ry: word), которая создает и заполняет сектор в эллипсе. Координаты x, y – центр, b, Rx, Ry – горизонтальный и вертикальный радиусы, и сектор вычерчивается от начального угла a до конечного угла b.
Пример использования PieSlice:
SetFillStyle(10, 10); {установка стиля}
SetColor(12); {цвет вычерчивания}
PieSlice(100, 100, 0, 90, 50);
Пример использования Sector:
SetFillStyle(11, 9); {установка стиля}
SetColor(LightMagenta); {цвет вычерчивания}
Sector(300, 150, 180, 135, 60, 70);