note description: "Contains information about the Wm_paint message." legal: "See notice at end of class." status: "See notice at end of class." date: "$Date$" revision: "$Revision$" class WEL_PAINT_STRUCT inherit WEL_STRUCTURE create make feature -- Access erase: BOOLEAN -- Must the background be erased? do Result := cwel_paintstruct_get_ferase (item) end rect_paint: WEL_RECT -- Rectangle that specifies which part -- must be painted. do create Result.make_by_pointer ( cwel_paintstruct_get_rcpaint (item)) ensure result_not_void: Result /= Void end feature -- Measurement structure_size: INTEGER -- Size to allocate (in bytes) once Result := c_size_of_paintstruct end feature {NONE} -- Externals c_size_of_paintstruct: INTEGER external "C [macro ]" alias "sizeof (PAINTSTRUCT)" end cwel_paintstruct_get_ferase (ptr: POINTER): BOOLEAN external "C [macro ]" end cwel_paintstruct_get_rcpaint (ptr: POINTER): POINTER external "C [macro ] (PAINTSTRUCT*): EIF_POINTER" end note copyright: "Copyright (c) 1984-2006, Eiffel Software and others" license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)" source: "[ Eiffel Software 356 Storke Road, Goleta, CA 93117 USA Telephone 805-685-1006, Fax 805-685-6869 Website http://www.eiffel.com Customer support http://support.eiffel.com ]" end