W Cat - Описание языка PascalABC.NET
clWhite
clWhiteSmoke
clYellow
clYellowGreen
Подпрограммы для работы с пером
Рисование линий осуществляется текущим пером. Доступ к свойствам текущего пера можно осуществлять как в процедурном, так и в объектно-ориентированном стиле.
Процедуры и функции для доступа к свойствам пера сгруппированы парами: если Prop - имя свойства пера, то функция PenProp возвращает значение этого свойства, а процедура SetPenProp(p) устанавливает это свойство:
procedure SetPenColor(c: Color);
Устанавливает цвет текущего пера
function PenColor: Color;
Возвращает цвет текущего пера
procedure SetPenWidth(Width: integer);
Устанавливает ширину текущего пера
function PenWidth: integer;
Возвращает ширину текущего пера
procedure SetPenStyle(style: DashStyle);
Устанавливает стиль текущего пера. Константы стилей пера приведены здесь
function PenStyle: DashStyle;
Возвращает стиль текущего пера. Константы стилей пера приведены здесь
procedure SetPenMode(m: integer);
Устанавливает режим текущего пера
function PenMode: integer;
Возвращает режим текущего пера
function PenX: integer;
Возвращают x-координату текущей позиции рисования
function PenY: integer;
Возвращают y-координату текущей позиции рисования
Кроме этого, можно изменять свойства текущего пера через объект Pen.
Текущее перо Pen
Объект текущего пера возвращается функцией Pen и имеет тип GraphABCPen:
function Pen: GraphABCPen;
Класс GraphABCPen имеет следующий интерфейс:
type
GraphABCPen = class
property NETPen: System.Drawing.Pen;
property Color: GraphABC.Color;
property Width: integer;
property Style: DashStyle;
property Mode: integer;
property X: integer;
property Y: integer;
end;
Свойства класса GraphABCPen описаны в следующей таблице:
property NETPen: System.Drawing.Pen;
Текущее перо .NET. Служит для более тонкой настройки свойств пера
property Color: GraphABC.Color;
Цвет пера
property Width: integer;
Ширина пера
property Style: DashStyle;
Стиль пера. Константы стилей пера приведены здесь
property Mode: integer;
Режим пера
property X: integer;
Координата X пера (только чтение)
property Y: integer;
Координата Y пера (только чтение)
Пример.
Pen.Color := clRed;
Pen.Style := psDot;
Кроме этого, можно изменять свойства текущего пера, используя соответствующие процедуры и функции.
Стили пера
Стили пера задаются перечислимым типом DashStyle. Кроме того, для стилей пера определены следующие константы:
psSolid = DashStyle.Solid;
Сплошное перо
psClear = DashStyle.Clear;
Прозрачное перо
psDash = DashStyle.Dash;
Штриховое перо
psDot = DashStyle.Dot;
Пунктирное перо
psDashDot = DashStyle.DashDot;
Штрихунктирное перо
psDashDotDot = DashStyle.DashDotDot;
Альтернативное штрихунктирное перо
Подпрограммы для работы с кистью
Рисование внутренностей замкнутых областей осуществляется текущей кистью. Доступ к свойствам текущей кисти можно осуществлять как в процедурном, так и в объектно-ориентированном стиле.
Процедуры и функции для доступа к свойствам кисти сгруппированы парами: если Prop - имя свойства кисти, то функция PenProp возвращает значение этого свойства, а процедура SetPenProp(p) устанавливает это свойство:
procedure SetBrushColor(c: Color);
Устанавливает цвет текущей кисти
function BrushColor: Color;
Возвращает цвет текущей кисти
procedure SetBrushStyle(bs: BrushStyleType);
Устанавливает стиль текущей кисти. Константы стилей кисти приведены здесь
function BrushStyle: BrushStyleType;
Возвращает стиль текущей кисти. Константы стилей кисти приведены здесь
procedure SetBrushHatch(bh: HatchStyle);
Устанавливает штриховку текущей кисти. Константы стилей штриховки кисти приведены здесь
function BrushHatch: HatchStyle;
Возвращает штриховку текущей кисти. Константы стилей штриховки кисти приведены здесь
procedure SetHatchBrushBackgroundColor(c: Color);
Устанавливает цвет заднего плана текущей штриховой кисти
function HatchBrushBackgroundColor: Color;
Возвращает цвет заднего плана текущей штриховой кисти
procedure SetGradientBrushSecondColor(c: Color);
Устанавливает второй цвет текущей градиентной кисти
function GradientBrushSecondColor: Color;
Возвращает второй цвет текущей градиентной кисти
Кроме этого, можно изменять свойства текущей кисти через объект Brush.
Текущая графическая кисть Brush
Объект текущей кисти возвращается функцией Brush и имеет тип GraphABCBrush:
function Brush: GraphABCBrush;
Класс GraphABCBrush имеет следующий интерфейс:
type
GraphABCBrush = class
property NETBrush: System.Drawing.Brush;
property Color: GraphABC.Color;
property Style: BrushStyleType;
property Hatch: HatchStyle;
property HatchBackgroundColor: GraphABC.Color;
property GradientSecondColor: GraphABC.Color;
end;
Свойства класса GraphABCBrush описаны в следующей таблице:
property NETBrush: System.Drawing.Brush;
Текущая кисть .NET
property Color: GraphABC.Color;
Цвет кисти
property Style: BrushStyleType;
Стиль кисти
property Hatch: HatchStyle;
Штриховка кисти
property HatchBackgroundColor: GraphABC.Color;
Цвет заднего плана штриховой кисти
property GradientSecondColor: GraphABC.Color;
Второй цвет градиентной кисти
Пример.
Brush.Color := clRed;
Brush.Style := bsHatch;
Brush.Hatch := bhBackwardDiagonal;
Кроме того, можно изменять свойства текущей кисти, используя соответствующие процедуры и функции.
Стили кисти
Стили кисти задаются перечислимым типом BrushStyleType:
type BrushStyleType = (bsSolid, bsClear, bsHatch, bsGradient);
Константы имеют следующий смысл:
bsSolid
Сплошная кисть (по умолчанию)
bsClear
Прозрачная кисть
bsHatch
Штриховая кисть
bsGradient
Градиентная кисть
Для всех кистей используется свойство Color. Для штриховой кисти дополнительно можно устанавливать свойства Hatch и HatchBackgroundColor, для градиентной - свойство GradientSecondColor.
Стили штриховки кисти
Стили штриховки кисти задаются перечислимым типом HatchStyle. Кроме того, для стилей штриховки кисти определены следующие константы:
bhHorizontal
bhVertical
bhForwardDiagonal
bhBackwardDiagonal
bhCross
bhDiagonalCross
bhPercent05
bhPercent10
bhPercent20
bhPercent25
bhPercent30
bhPercent40
bhPercent50
bhPercent60
bhPercent70
bhPercent75
bhPercent80
bhPercent90
bhLightDownwardDiagonal
bhLightUpwardDiagonal
bhDarkDownwardDiagonal
bhDarkUpwardDiagonal
bhWideDownwardDiagonal
bhWideUpwardDiagonal
bhLightVertical
bhLightHorizontal
bhNarrowVertical
bhNarrowHorizontal
bhDarkVertical
