indexing
description: "This class represents a structure that containsinformation used to set the size and position ofa WEL_HEADER_CONTROL"
status: "See notice at end of class."
date: "$Date$"
revision: "$Revision$"
class interface
WEL_HD_LAYOUT
create
make
ensure WEL_STRUCTURE
not_shared: not shared
make_by_pointer (a_pointer: POINTER)
itema_pointer
item
a_pointer
WEL_ANY
ensure WEL_ANY
item_set: item = a_pointer
shared: shared
feature
item: POINTER
WEL_ANY
rectangle: WEL_RECT
require
exists: exists
window_pos: WEL_WINDOW_POS
require
exists: exists
feature
structure_size: INTEGER
ensure WEL_STRUCTURE
positive_result: Result > 0
feature
exists: BOOLEAN
item
WEL_ANY
ensure WEL_ANY
Result = (item /= default_pointer)
flag_set (flags, mask: INTEGER): BOOLEAN
maskflags
WEL_BIT_OPERATIONS
shared: BOOLEAN
item
item
destroy_item
item
WEL_ANY
feature
set_shared
shared
WEL_ANY
ensure WEL_ANY
shared: shared
set_unshared
shared
WEL_ANY
ensure WEL_ANY
unshared: not shared
feature
set_item (an_item: POINTER)
iteman_item
WEL_ANY
ensure WEL_ANY
item_set: item = an_item
set_rectangle (a_rect: WEL_RECT)
require
exists: exists
rect_exists: a_rect.exists
set_window_pos (value: WEL_WINDOW_POS)
require
exists: exists
window_pos_exists: value.exists
feature
dispose
Current
Current
WEL_ANY
feature
to_integer: INTEGER
item
WEL_ANY
ensure WEL_ANY
Result = cwel_pointer_to_integer (item)
feature
clear_flag (flags, mask: INTEGER): INTEGER
maskflags
WEL_BIT_OPERATIONS
ensure WEL_BIT_OPERATIONS
flag_unset: not flag_set (Result, mask)
initialize
WEL_STRUCTURE
require WEL_STRUCTURE
exists: exists
initialize_with_character (a_character: CHARACTER)
a_character
WEL_STRUCTURE
require WEL_STRUCTURE
exists: exists
memory_copy (source_pointer: POINTER; length: INTEGER)
lengthsource_pointeritem
WEL_STRUCTURE
require WEL_STRUCTURE
length_small_enough: length <= structure_size
length_large_enough: length > 0
exists: exists
set_flag (flags, mask: INTEGER): INTEGER
maskflags
WEL_BIT_OPERATIONS
ensure WEL_BIT_OPERATIONS
flag_set: flag_set (Result, mask)
invariant
ANY
reflexive_equality: standard_is_equal (Current)
reflexive_conformance: conforms_to (Current)
end -- WEL_HD_LAYOUT