Solved

API to delete GDI objects that are not in use

Posted on 2003-11-19
5
749 Views
Last Modified: 2008-02-01
Is there an API that I can call, that will free up the GDI objects that I have created, and finished using ?

We have a heavy application in terms of GDI objects count, and this might be a work around for the main problem.
0
Comment
Question by:UriS
  • 3
5 Comments
 
LVL 3

Expert Comment

by:NBrownoh
ID: 9783409
Private Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long
0
 
LVL 85

Expert Comment

by:Mike Tomlinson
ID: 9783515
You have to be careful when creating and deleting GDI objecst as you can suck the life (memory) out of a system really fast by creating too many GDI objects.

As NBrownoh pointed out, you use the DeleteObject() API to delete your objects.

Here is some wisdom I just learned earlier today.  When you use the SelectObject() API, it returns a handle to the previously selected object.  You should then put this object back as the selected object and before deleting the object you just created and used.

Dim hbrush As Long
Dim ret As Long
   
hbrush = GetStockObject(NULLBRUSH) ' create an object
ret = SelectObject(hDC, hbrush) ' store handle to previous object
Polygon hDC, points(0), Me.numVertices ' use the object
SelectObject hDC, ret ' put previous object back
DeleteObject hbrush ' delte the object we created

Regards,

Idle_Mind
0
 
LVL 2

Author Comment

by:UriS
ID: 9784912
how can I delete the objects without first saving a pointer to them?
0
 
LVL 85

Expert Comment

by:Mike Tomlinson
ID: 9788277
You can't.

Idle_Mind
0
 
LVL 85

Accepted Solution

by:
Mike Tomlinson earned 125 total points
ID: 9828296
When you create objects and no longer have pointers to them, you create what is commonly known as a "memory leak".  The API calls you are making are not part of Visual Basic and as such, do not fall under its garbage collection scheme.  You have to manage your pointers and free the resources yourself.  Failure to do so will cause the system memory to be lost to all applications running until the system is rebooted.

Idle_Mind
0

Featured Post

Free Tool: Postgres Monitoring System

A PHP and Perl based system to collect and display usage statistics from PostgreSQL databases.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Problem to skip loop 6 62
Powerpoint 2013: Change cell reference in excel link 3 77
checkbox to hide entire section 10 41
adding "ungroup sheets" to existing vbs code 5 29
Introduction In a recent article (http://www.experts-exchange.com/A_7811-A-Better-Concatenate-Function.html) for the Excel community, I showed an improved version of the Excel Concatenate() function.  While writing that article I realized that no o…
Introduction While answering a recent question (http://www.experts-exchange.com/Q_27402310.html) in the VB classic zone, I wrote some VB code in the (Office) VBA environment, rather than fire up my older PC.  I didn't post completely correct code o…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…

840 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question