Windows API Guide - Reference - Volume 1: Version 3.0 For the MS-DOS and PC-DOS Operating Systems

Declare Function CreateHatchBrush Lib "gdi32.dll" (ByVal nIndex As Long, ByVal crColor As Long) As Long

Platforms: Win 32s, Win 95/98, Win NT

CreateHatchBrush creates a hatched brush object. When used to fill an area or shape, this brush produces a pattern of lines (a "hatch pattern") in a single color using an 8x8 unit cell. After the program finishes using the hatched brush, it should use DeleteObject to delete the brush and free system resources. The function returns a handle to the newly created hatched brush if successful, or 0 if an error occured.

nIndex

Exactly one of the following flags specifying which hatch pattern to use to make the brush:

HS_BDIAGONAL = 3

Diagonal lines from the bottom-left to the upper-right.

HS_CROSS = 4

Cross pattern of horizontal and vertical lines.

HS_DIAGCROSS = 5

Cross pattern of perpendicular diagonal lines.

HS_FDIAGONAL = 2

Diagonal lines from the upper-left to the bottom-right.

HS_HORIZONTAL = 0

Horizontal lines.

HS_VERTICAL = 1

Vertical lines.

crColor

The RGB value of the color to give the hatched brush. Visual Basic users can use the RGB() function to generate this value.

Example:

' Draw a rectangle with corners (10,20) and (175,100) ' on window Form1. Use a yellow brush with a diagonal cross pattern to fill the rectangle. Dim hbrush As Long ' receives handle to the hatched yellow brush Dim holdbrush As Long ' receives handle to Form1's default brush Dim retval As Long ' return value hbrush = CreateHatchBrush(HS_DIAGCROSS, RGB(255, 255, 0)) ' create a hatched yellow brush ' Save Form1's default brush so we can restore it after the program is finished holdbrush = SelectObject(Form1.hDC, hbrush) ' select the brush ' Draw the rectangle filled using the hatched yellow brush retval = Rectangle(Form1.hDC, 10, 20, 175, 100) ' Restore Form1's previous brush before destroying the created one retval = SelectObject(Form1.hDC, holdbrush) ' select old brush retval = DeleteObject(hbrush) ' destroy the hatched yellow brush

See Also: CreateSolidBrush Category: Brushes

Go back to the alphabetical Function listing. Go back to the Reference section index.

This page is copyright © 2000 Paul Kuliniewicz. Copyright Information. Go back to the Windows API Guide home page. E-mail: vbapi@vbapi.com Send Encrypted E-Mail This page is at http://www.vbapi.com/ref/c/createhatchbrush.html