home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / ARQS_ZIP / HGDLL.ZIP / HGDLL.C next >
Encoding:
C/C++ Source or Header  |  1991-12-18  |  809 b   |  48 lines
  1. /*HGLASSDLL.c - Minimum DLL for GENERATING an HGLASS cursor in vb */
  2.  
  3. #include <WINDOWS.H>
  4.  
  5. int FAR PASCAL LibMain (HANDLE     hInstance,
  6.                         WORD    wDataSeg,
  7.                         WORD    cbHeapSize,
  8.                         LPSTR    lpszCmdLine)
  9.  
  10. {
  11.     if (cbHeapSize != 0)     /* If DLL seg is MOVABLE */
  12.         UnlockData(0);
  13.  
  14.     return (1);                /* Init successfull.     */
  15. }
  16.  
  17. VOID FAR PASCAL Hglass (void)
  18. {
  19.     HCURSOR hHourGlass;
  20.  
  21.     hHourGlass = LoadCursor(NULL, IDC_WAIT);
  22.  
  23.     SetCursor(hHourGlass);
  24. }
  25.  
  26.  
  27. int FAR PASCAL WEP (int nParameter)
  28. {
  29.     if (nParameter == WEP_SYSTEM_EXIT)
  30.     {
  31.         /* System shutdown in progress... */
  32.         return (1);
  33.     }
  34.     else
  35.     {
  36.         if (nParameter == WEP_FREE_DLL)
  37.         {
  38.             /*DLL use is zero.  ALL apps have freed it */
  39.             return (1);
  40.         }
  41.         else
  42.         {
  43.             /*Undefined value.  Ignore. */
  44.             return (1);
  45.         }
  46.     }
  47. }
  48.