rostests/apitests/gdi32api/tests/ExtCreatePen.c

   1 INT
   2 Test_ExtCreatePen(PTESTINFO pti)
   3 {
   4         HPEN hPen;
   5         LOGBRUSH logbrush;
   6         DWORD dwStyles[17] = {1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17};
   7
   8         logbrush.lbStyle = BS_SOLID;
   9         logbrush.lbColor = RGB(1,2,3);
  10         logbrush.lbHatch = 0;
  11         hPen = ExtCreatePen(PS_COSMETIC, 1,&logbrush, 0, 0);
  12         if (!hPen) return FALSE;
  13
  14         /* Test if we have an EXTPEN */
  15         RTEST(GDI_HANDLE_GET_TYPE(hPen) == GDI_OBJECT_TYPE_EXTPEN);
  16         DeleteObject(hPen);
  17
  18         /* test userstyles */
  19         hPen = ExtCreatePen(PS_GEOMETRIC | PS_USERSTYLE, 5, &logbrush, 17, (CONST DWORD*)&dwStyles);
  20         RTEST(hPen == 0);
  21         hPen = ExtCreatePen(PS_GEOMETRIC | PS_USERSTYLE, 5, &logbrush, 16, (CONST DWORD*)&dwStyles);
  22         RTEST(hPen != 0);
  23
  24         DeleteObject(hPen);
  25
  26         return APISTATUS_NORMAL;
  27 }
  28
  29