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 | |
bhDarkHorizontal | |
bhDashedDownwardDiagonal | |
bhDashedUpwardDiagonal | |
bhDashedHorizontal | |
bhDashedVertical | |
bhSmallConfetti | |
bhLargeConfetti | |
bhZigZag | |
bhWave | |
bhDiagonalBrick | |
bhHorizontalBrick | |
bhWeave | |
bhPlaid | |
bhDivot | |
bhDottedGrid | |
bhDottedDiamond | |
bhShingle | |
bhTrellis | |
bhSphere | |
bhSmallGrid | |
bhSmallCheckerBoard | |
bhLargeCheckerBoard | |
bhOutlinedDiamond | |
bhSolidDiamond | |
bhMin | |
bhLargeGrid | |
bhMax |
Подпрограммы для работы со шрифтом
Вывод текста осуществляется текущим шрифтом. Доступ к свойствам текущего шрифта можно осуществлять как в процедурном, так и в объектно-ориентированном стиле.
Процедуры и функции для доступа к свойствам шрифта сгруппированы парами: если Prop - имя свойства пера, то функция PenProp возвращает значение этого свойства, а процедура SetPenProp(p) устанавливает это свойство: