INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: "Specifies the width and height of a rectangle. ", "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_SIZE
inherit

WEL_STRUCTURE
rename
make as structure_make
end
creation

make
feature {NONE}-- Initialization

make (a_width, a_height: INTEGER)
-- Make a size and set `width',
-- `height', with `a_width', `a_height'
ensure
width_set: width = a_width
height_set: height = a_height
feature -- Access

width: INTEGER
-- Width of the rectangle

height: INTEGER
-- Height of the rectangle
feature -- Element change

set_width (a_width: INTEGER)
-- Set `width' with `a_width'
ensure
width_set: width = a_width

set_height (a_height: INTEGER)
-- Set `height' with `a_height'
ensure
height_set: height = a_height
feature -- Measurement

structure_size: INTEGER
-- Size to allocate (in bytes)
end -- class WEL_SIZE

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES