INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: "Object brush which can be selected into a DC. ", "WEL: library of reusable components for Eiffel. ", "Based on WEL library for ISE Eiffel, used with permission. "
project: "Windows Eiffel Library"
copyright: "(c) 1986-1997 Interactive Software Engineering Inc. ", "Modifications and extensions: ", "(c) 1997 Object Tools ", "All rights reserved. Duplication and distribution prohibited", "May be used only with Visual Eiffel under terms of user ", "license "
cluster: wel
class WEL_BRUSH
inherit

WEL_GDI_ANY
end
creation

make_by_pattern,
make_by_pointer,
make_by_sys_color,
make_hatch,
make_indirect,
make_solid
feature {NONE}-- Initialization

make_by_sys_color (sys_color: INTEGER)
-- Make a brush using the system color `sys_color'.
-- See class WEL_COLOR_CONSTANTS for `sys_color' value.
-- Use only this creation routine for a WNDCLASS brush.
ensure
shared: shared

make_solid (a_color: WEL_COLOR_REF)
-- Make a brush that has the solid `a_color'
require
a_color_not_void: a_color /= void
ensure
color_set: exists implies color.is_equal (a_color)

make_hatch (a_hatch: INTEGER; a_color: WEL_COLOR_REF)
-- Make a brush that has the
-- `hatch_style' pattern and `a_color'
-- See class WEL_HS_CONSTANTS for `a_hatch'
require
a_color_not_void: a_color /= void
ensure
hatch_set: exists implies hatch = a_hatch
color_set: exists implies color.is_equal (a_color)

make_by_pattern (bitmap: WEL_BITMAP)
-- Make a brush with the specified `bitmap' pattern.
require
bitmap_not_void: bitmap /= void
bitmap_exists: bitmap.exists

make_indirect (a_log_brush: WEL_LOG_BRUSH)
-- Make a brush using `a_log_brush'
require
a_log_brush_not_void: a_log_brush /= void
feature -- Access

style: INTEGER
-- Brush style
require
exists: exists

color: WEL_COLOR_REF
-- Brush color
require
exists: exists
ensure
result_not_void: Result /= void

hatch: INTEGER
-- Brush hatch
require
exists: exists

log_brush: WEL_LOG_BRUSH
-- Log brush structure associated to `Current'
require
exists: exists
ensure
result_not_void: Result /= void
end -- class WEL_BRUSH

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES