Getting free resource under Windows 95

If I could have a penny for all the times this question has been posted in discussion board .. well, finally .. looking at Corel Draw 7 script samples (!) I could figure out how to get the free system resource under Windows 95.
And here is the code for you; take care of this - it works ONLY under Windows 95 (not NT) and you must (I think) have the resource meter installed, since we are using its function, not system ones.
In other words, this way will fail if you don't have the "RSRC32.dll" installed.

#include "stdio.h"
#include "windows.h"

#define GFSR_SYSTEMRESOURCES	0
#define GFSR_GDIRESOURCES		1
#define GFSR_USERRESOURCES		2

typedef LONG (CALLBACK* GETRES)(int);

void main()
{
	HINSTANCE hInst = LoadLibrary("RSRC32.dll");
	if (hInst != NULL)
	{
		GETRES pGetRes = (GETRES) GetProcAddress(hInst, "_MyGetFreeSystemResources32@4");//); 

		if (pGetRes)
		{
			long lSysRes = (*pGetRes)(GFSR_SYSTEMRESOURCES);
			long lGdiRes = (*pGetRes)(GFSR_GDIRESOURCES);
			long lUsrRes = (*pGetRes)(GFSR_USERRESOURCES);
			printf("System resource: %d\n", lSysRes);
			printf("GDI resource: %d\n", lGdiRes);
			printf("User resource: %d\n", lUsrRes);
			return;
		}
		printf("Error getting pointer to _MyGetFreeSystemResources32()\n");
		return;
	}
	printf("Error loading rsrc32.dll. You must run this under Win95 only and with the resource meter installed.\n\n");
}

Last updated: 26 June 1998



Comments

  • DLL

    Posted by Legacy on 09/07/2002 12:00am

    Originally posted by: Dima

    How can I get that file, rsrc32.dll or unmodified state(source code)?
    May you send to me by my email address.
    Thank.

    Reply
  • rsrc32.dll

    Posted by Legacy on 10/30/2001 12:00am

    Originally posted by: Hung

    How can I get that file, rsrc32.dll?
    May you send to me by my email address.
    Thank.

    Reply
Leave a Comment
  • Your email address will not be published. All fields are required.

Top White Papers and Webcasts

  • Live Event Date: March 19, 2015 @ 1:00 p.m. ET / 10:00 a.m. PT The 2015 Enterprise Mobile Application Survey asked 250 mobility professionals what their biggest mobile challenges are, how many employees they are equipping with mobile apps, and their methods for driving value with mobility. Join Dan Woods, Editor and CTO of CITO Research, and Alan Murray, SVP of Products at Apperian, as they break down the results of this survey and discuss how enterprises are using mobile application management and private …

  • According to technology research firm Gartner, cloud computing will become the bulk of new IT spend by 20161. By the end of 2017, Gartner predicts that nearly half of large enterprises will have hybrid cloud deployments1. Learn how you can use these trends to your advantage by offering cloud and hybrid data solutions to your customers.

Most Popular Programming Stories

More for Developers

RSS Feeds

Thanks for your registration, follow us on our social networks to keep up-to-date