Please use FireFox to view this page

Visual Basic 6 definition

Declare Function CreateSolidBrush Lib "gdi32.dll" (ByVal crColor As Long) As Long

Visual Basic .NET definition

Declare Function CreateSolidBrush Lib "gdi32" (ByVal crColor As Integer) As Integer

C# definition

[DllImport("gdi32")] public static extern int CreateSolidBrush(int crColor)

Description

Platforms: Win 32s, Win 95/98, Win NT CreateSolidBrush creates a solid brush object. When used to fill an area or shape, this brush creates a solid fill of a single color. After it is finished using the brush, the program should use DeleteObject to delete the brush and free up system resources. The function returns a handle to the newly created solid brush if successful, or 0 if an error occured. CreateSolidBrush Creates a brush with a solid color. System.Drawing.SolidBrush constructor CreateSolidBrush Creates a brush with a solid color. System.Drawing.SolidBrush constructor

Parameters

crColor The RGB value of the color to give the solid brush. Visual Basic users can use the intrinsic RGB() function to calculate this value.

Further Information:

For further information on Windows API functions such as these, and how to use these API's in your C# and VB.NET applications, please refer to the book 'Network programming in .NET' (Buy at Amazon UK) (Buy at Amazon US)

Visual Basic 6 example source code
' Draw a rectangle with corners (10,20) and (175,100) ' on window Form1. Use a solid yellow brush to fill the rectangle. Dim hbrush As Long ' receives handle to the solid yellow brush Dim holdbrush As Long ' receives handle to Form1's default brush Dim retval As Long ' return value hbrush = CreateSolidBrush(RGB(255, 255, 0)) ' create a solid 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 solid 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 solid yellow brush

Provide a code example

C#
VB.NET
VB6