4 * Copyright 1993 Alexandre Julliard
15 /***********************************************************************
16 * CreatePen16 (GDI.61)
18 HPEN16 CreatePen16( INT16 style, INT16 width, COLORREF color )
20 LOGPEN32 logpen = { style, { width, 0 }, color };
21 dprintf_gdi(stddeb, "CreatePen16: %d %d %06lx\n", style, width, color );
22 return CreatePenIndirect32( &logpen );
26 /***********************************************************************
27 * CreatePen32 (GDI32.55)
29 HPEN32 CreatePen32( INT32 style, INT32 width, COLORREF color )
31 LOGPEN32 logpen = { style, { width, 0 }, color };
32 dprintf_gdi(stddeb, "CreatePen32: %d %d %06lx\n", style, width, color );
33 return CreatePenIndirect32( &logpen );
37 /***********************************************************************
38 * CreatePenIndirect16 (GDI.62)
40 HPEN16 CreatePenIndirect16( const LOGPEN16 * pen )
45 if (pen->lopnStyle > PS_INSIDEFRAME) return 0;
46 hpen = GDI_AllocObject( sizeof(PENOBJ), PEN_MAGIC );
48 penPtr = (PENOBJ *)GDI_HEAP_LIN_ADDR( hpen );
49 penPtr->logpen.lopnStyle = pen->lopnStyle;
50 penPtr->logpen.lopnColor = pen->lopnColor;
51 CONV_POINT16TO32( &pen->lopnWidth, &penPtr->logpen.lopnWidth );
56 /***********************************************************************
57 * CreatePenIndirect32 (GDI32.56)
59 HPEN32 CreatePenIndirect32( const LOGPEN32 * pen )
64 if (pen->lopnStyle > PS_INSIDEFRAME) return 0;
65 hpen = GDI_AllocObject( sizeof(PENOBJ), PEN_MAGIC );
67 penPtr = (PENOBJ *)GDI_HEAP_LIN_ADDR( hpen );
68 penPtr->logpen.lopnStyle = pen->lopnStyle;
69 penPtr->logpen.lopnWidth = pen->lopnWidth;
70 penPtr->logpen.lopnColor = pen->lopnColor;
75 /***********************************************************************
78 INT16 PEN_GetObject16( PENOBJ * pen, INT16 count, LPSTR buffer )
81 logpen.lopnStyle = pen->logpen.lopnStyle;
82 logpen.lopnColor = pen->logpen.lopnColor;
83 CONV_POINT32TO16( &pen->logpen.lopnWidth, &logpen.lopnWidth );
84 if (count > sizeof(logpen)) count = sizeof(logpen);
85 memcpy( buffer, &logpen, count );
90 /***********************************************************************
93 INT32 PEN_GetObject32( PENOBJ * pen, INT32 count, LPSTR buffer )
95 if (count > sizeof(pen->logpen)) count = sizeof(pen->logpen);
96 memcpy( buffer, &pen->logpen, count );