home *** CD-ROM | disk | FTP | other *** search
- /*
-
- Name: Sizeofre.c
-
- Description :
- FindResource is used first to locate and identify the resource
- item. SizeofResource is used to determine how many bytes need
- to be read to obtain the resource item, and finally
- AccessResource() is used to get the handle and set the file
- pointer to the beginning of the selected resource. AccessResource()
- opens the file (resource) as a result, so it must be explicitely
- closed. In this case, "It works!" is displayed in a MessageBox()
- upon successful completion, "It failed" displays if unsuccessful.
-
-
- Additional Comments: Note that _lclose() must be used to close the file
- (resource).
-
- */
-
- #include <windows.h>
- #include "sizeofre.h"
-
- long FAR PASCAL WndProc (HWND, unsigned, WORD, LONG) ;
- int sprintf(PSTR, PSTR, int);
- int FAR PASCAL _lclose(int);
- int FAR PASCAL _lread(HANDLE, LPSTR, short);
-
- static char szBuffer[8];
- static int ErrorCheck;
- static char szResName [] = "HotStuff";
-
- int PASCAL WinMain (hInstance, hPrevInstance, lpszCmdLine, nCmdShow)
- HANDLE hInstance, hPrevInstance ;
- LPSTR lpszCmdLine ;
- int nCmdShow ;
- {
- static char szAppName [] = "Resources" ;
- HWND hWnd ;
- WNDCLASS wndclass ;
- MSG msg;
-
- if (!hPrevInstance)
- {
- wndclass.style = CS_HREDRAW | CS_VREDRAW ;
- wndclass.lpfnWndProc = WndProc ;
- wndclass.cbClsExtra = 0 ;
- wndclass.cbWndExtra = 0 ;
- wndclass.hInstance = hInstance ;
- wndclass.hIcon = LoadIcon (NULL, IDI_APPLICATION) ;
- wndclass.hCursor = LoadCursor (NULL, IDC_ARROW) ;
- wndclass.hbrBackground = GetStockObject (WHITE_BRUSH) ;
- wndclass.lpszMenuName = NULL ;
- wndclass.lpszClassName = szAppName ;
-
- if (!RegisterClass (&wndclass))
- return FALSE ;
- }
-
- hWnd = CreateWindow (szAppName, /* window class name */
- "The Joy of Resources", /* window caption */
- WS_OVERLAPPEDWINDOW, /* window style */
- CW_USEDEFAULT, /* initial x position */
- 0, /* initial y position */
- CW_USEDEFAULT, /* initial x size */
- 0, /* initial y size */
- NULL, /* parent window handle */
- NULL, /* window menu handle */
- hInstance, /* program instance handle */
- NULL) ; /* create parameters */
-
- ShowWindow (hWnd, nCmdShow) ;
-
- UpdateWindow (hWnd) ;
-
- while (GetMessage(&msg, NULL, 0, 0))
- {
- TranslateMessage(&msg);
- DispatchMessage(&msg);
- }
- return (msg.wParam) ;
- }
-
- long FAR PASCAL WndProc (hWnd, iMessage, wParam, lParam)
- HWND hWnd ;
- unsigned iMessage ;
- WORD wParam ;
- LONG lParam ;
- {
- static HANDLE hInstance, hResource;
- int hFile;
-
- PAINTSTRUCT ps;
- char szStuff[20], szSuccess[20];
- short sRes;
- HMENU hMenu;
- switch(iMessage)
- {
- case WM_CREATE:
- {
- hInstance = GetWindowWord(hWnd, GWW_HINSTANCE);
- hMenu = LoadMenu(hInstance, "ResMenu");
- SetMenu(hWnd, hMenu);
- DrawMenuBar(hWnd);
- break;
- }
- case WM_PAINT:
- {
- BeginPaint(hWnd, (LPPAINTSTRUCT)&ps);
- EndPaint(hWnd, (LPPAINTSTRUCT)&ps);
- break;
- }
- case WM_COMMAND:
- {
- switch(wParam)
- {
- case IDM_EXECUTE:
- {
- /* FindResource is used first to locate and identify the resource
- item. SizeofResource is used to determine how many bytes need
- to be read to obtain the resource item, and finally
- AccessResource() is used to get the handle and set the file
- pointer to the beginning of the selected resource. AccessResource()
- opens the file (resource) as a result, so it must be explicitely
- closed.
- */
- hResource = FindResource(hInstance, "HotStuff", RT_RCDATA);
- sRes = SizeofResource(hInstance, hResource);
- hFile = AccessResource(hInstance, hResource);
- ErrorCheck = _lread(hFile, (LPSTR)szStuff, sRes);
- ErrorCheck = _lclose(hFile);
- if (hFile<1)
- {
- ErrorCheck = sprintf(szStuff, "It failed");
- ErrorCheck = sprintf(szSuccess, "Error");
- } else
- {
- ErrorCheck = sprintf(szSuccess, "Item read");
- }
- MessageBox(GetFocus(), szStuff, szSuccess, MB_OK);
- }
- }
- break;
- }
- case WM_DESTROY:
- {
- PostQuitMessage(0);
- break;
- }
- default:
- {
- return DefWindowProc (hWnd, iMessage, wParam, lParam) ;
- }
- }
- return (0L);
- }
-