Windows API Guide: CopyFile Function

---

Declare Function DeleteObject Lib "gdi32.dll" (ByVal hObject As Long) As Long

DeleteObject deletes an object after the program has finished using it. These objects include bitmaps, brushes, fonts, palettes, pens, and regions. Of course the object should never be deleted until it is no longer in use by any devices (see the example for a demonstration). Deleting the object frees up system resources associated with it. The function returns 1 if successful, or 0 if an error occured.

hObject

A handle to the bitmap, brush, font, palette, pen, or region to delete.

Example:

' 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

Category: Devices

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: [e-mail] Send Encrypted E-Mail
This page is at http://www.vbapi.com/ref/d/deleteobject.html