home *** CD-ROM | disk | FTP | other *** search
/ PC Pro 1996 January / PCPRO_JAN96.ISO / code / os2 / listing2.txt < prev    next >
Encoding:
Text File  |  1995-11-01  |  690 b   |  26 lines
  1. VOID DrawBevelBorder (
  2.                       HPS hps,
  3.                       HWND hwnd
  4.                      )
  5. {
  6.   RECTL rcl;
  7.  
  8.  
  9.   WinQueryWindowRect (hwnd, &rcl);
  10.   WinFillRect (hps, &rcl, SYSCLR_DIALOGBACKGROUND);
  11.  
  12.   WinDrawBorder (hps,
  13.                  &rcl, 
  14.                  WinQuerySysValue (HWND_DESKTOP, SV_CXDLGFRAME) / 2,
  15.                  WinQuerySysValue (HWND_DESKTOP, SV_CYDLGFRAME) / 2,
  16.                  SYSCLR_BUTTONDARK,
  17.                  SYSCLR_BUTTONLIGHT,
  18.                  DB_RAISED);
  19.  
  20.   GpiMove (hps, (PPOINTL)&rcl);
  21.   rcl.xRight--;
  22.   rcl.yTop--;
  23.   GpiSetColor (hps, SYSCLR_WINDOWFRAME);
  24.   GpiBox (hps, DRO_OUTLINE, (PPOINTL)&rcl.xRight, 0L, 0L);
  25. }
  26.