Работа с кистью и пером на winAPI.

Создает логическую кисть с шаблоном Bitmap.

function CreatePatternBrush(Bitmap: HBitmap): HBrush;
Параметры:
Bitmap: Идентификатор карты бит HBitmap.
Возвращаемое значение:
В случае успешного завершения - идентификатор логической кисти; 0 - в противном случае.

Заполняет область, используя выбранную кисть.

function PaintRgn(DC: HDC; Rgn: HRgn): Bool;
Параметры:
DC: Контекст устройства.
Rgn: Заполняемая область.
Возвращаемое значение:
Не нуль в случае успешного завершения; 0 - в противном случае.

Устанавливает начало выбранной кисти. Кисть не должна быть предопределенным объектом.

function SetBrushOrg(DC: HDC; X, Y: Integer): Longint;
Параметры:
DC: Идентификатор контекста устройства.
X, Y: Новое начало (в единицах устройства), в диапазоне от 0 до 7.
Возвращаемое значение:
Предыдущее начало, где координаты X и Y находятся в младшем и старшем слове, соответственно.

Создает логическую кисть, определенную LogBrush.

function CreateBrushIndirect(var LogBrush: TLogBrush): HBrush;
Параметры:
LogBrush: Структура TLogBrush.
Возвращаемое значение: В случае успешного завершения - идентификатор логической кисти; 0 - в противном случае.

Создает логическую кисть.

function CreateSolidBrush(Color: TColorRef): HBrush;
Параметры:
Color: Кисть TColorRef.
Возвращаемое значение: В случае успешного завершения - идентификатор логической кисти; 0 - в противном случае.

Создает логическую кисть с указанным стилем штриховки.

function CreateHatchBrush(index: Integer; Color: TColorRef): HBrush;
Параметры:
Index: Одна из констант hs_BDiagonal, hs_Cross, hs_DiagCross, hs_FDiagonal, hs_Horizontal или hs_Vertical.
Возвращаемое значение: В случае успешного завершения - идентификатор логической кисти; 0 - в противном случае.

Считывает начало кисти текущего устройства.

function GetBrushOrg(DC: HDC): Longint;
Параметры:
DC: Идентификатор контекста устройства.
Возвращаемое значение: Координаты X и Y в младшем и старшем слове, соответственно.

Создает логическое перо, определяемое LogPen.

function CreatePenIndirect(var LogPen: TLogPen): HPen;
Параметры:
LogPen: Структура TLogPen.
Возвращаемое значение: В случае успешного завершения - идентификатор логического пера; 0 - в противном случае.

Создает логическое перо.

function CreatePen(PenStyle, Width: Integer; Color: TColorRef): HPen;
Параметры:
PenStyle: Одна из констант ps_Solid, ps_Dash, ps_Dot, ps_DashDot, ps_DashDotDot, ps_Null или ps_InsideFrame.
Width: Ширина пера (в логических единицах).
Color: TColorRef пера.
Возвращаемое значение: В случае успешного завершения - идентификатор логического пера; 0 - в противном случае.

К оглавлению