indexing
description: "Dialog box which can be loaded from a resource. Common ancestor to modal and modeless dialog box."
legal: "See notice at end of class."
status: "See notice at end of class."
date: "$Date: 2006-03-22 23:29:03 -0800 (Wed, 22 Mar 2006) $"
revision: "$Revision: 57641 $"
deferred class interface
WEL_DIALOG
feature
children: LIST [WEL_WINDOW]
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
ensure WEL_COMPOSITE_WINDOW
result_not_void: Result /= Void
commands: WEL_COMMAND_MANAGER
WEL_WINDOW
default_processing: BOOLEAN
WEL_RETURN_VALUE
generating_type: STRING_8
ANY
generator: STRING_8
ANY
has_return_value: BOOLEAN
WEL_RETURN_VALUE
item: POINTER
WEL_ANY
menu: WEL_MENU
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
has_menu: has_menu
ensure WEL_COMPOSITE_WINDOW
result_not_void: Result /= Void
message_return_value: POINTER
WEL_RETURN_VALUE
require WEL_RETURN_VALUE
has_return_value: has_return_value
parent: WEL_WINDOW
WEL_WINDOW
result_id: INTEGER_32
scroller: WEL_SCROLLER
WEL_COMPOSITE_WINDOW
system_menu: WEL_MENU
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
has_system_menu: has_system_menu
ensure WEL_COMPOSITE_WINDOW
result_not_void: Result /= Void
feature
frozen deep_equal (some: ANY; other: like arg #1): BOOLEAN
`some'`other'
ANY
ensure ANY
shallow_implies_deep: standard_equal (some, other) implies Result
both_or_none_void: (some = Void) implies (Result = (other = Void))
same_type: (Result and (some /= Void)) implies some.same_type (other)
symmetric: Result implies deep_equal (other, some)
frozen equal (some: ANY; other: like arg #1): BOOLEAN
`some'`other'
ANY
ensure ANY
definition: Result = (some = Void and other = Void) or else ((some /= Void and other /= Void) and then some.is_equal (other))
is_equal (other: like Current): BOOLEAN
`other'
ANY
require ANY
other_not_void: other /= Void
ensure ANY
symmetric: Result implies other.is_equal (Current)
consistent: standard_is_equal (other) implies Result
frozen standard_equal (some: ANY; other: like arg #1): BOOLEAN
`some'`other'
ANY
ensure ANY
definition: Result = (some = Void and other = Void) or else ((some /= Void and other /= Void) and then some.standard_is_equal (other))
frozen standard_is_equal (other: like Current): BOOLEAN
`other'
ANY
require ANY
other_not_void: other /= Void
ensure ANY
same_type: Result implies same_type (other)
symmetric: Result implies other.standard_is_equal (Current)
feature
absolute_x: INTEGER_32
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
Result = window_rect.x
absolute_y: INTEGER_32
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
Result = window_rect.y
background_brush: WEL_BRUSH
WEL_WINDOW
ensure WEL_WINDOW
new_object: Result /= Void implies Result /= background_brush
captured_window: WEL_WINDOW
WEL_WINDOW
require WEL_WINDOW
exists: exists
window_captured: window_captured
child_window_from_point (point: WEL_POINT): POINTER
`Result'`point'
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
point_not_void: point /= Void
client_rect: WEL_RECT
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
result_not_void: Result /= Void
closeable: BOOLEAN
WEL_COMPOSITE_WINDOW
command (message: INTEGER_32): WEL_COMMAND
`message'
WEL_WINDOW
require WEL_WINDOW
positive_message: message >= 0
command_exists: command_exists (message)
ensure WEL_WINDOW
result_not_void: Result /= Void
command_argument (message: INTEGER_32): ANY
`message'
WEL_WINDOW
require WEL_WINDOW
positive_message: message >= 0
command_exists: command_exists (message)
command_exists (message: INTEGER_32): BOOLEAN
`message'
WEL_WINDOW
require WEL_WINDOW
positive_message: message >= 0
commands_enabled: BOOLEAN
WEL_WINDOW
conforms_to (other: ANY): BOOLEAN
`other'
ANY
require ANY
other_not_void: other /= Void
enabled: BOOLEAN
WEL_WINDOW
require WEL_WINDOW
exists: exists
ex_style: INTEGER_32
WEL_WINDOW
require WEL_WINDOW
exists: exists
exists: BOOLEAN
item
WEL_ANY
ensure WEL_ANY
Result = (item /= default_pointer)
focused_window: WEL_WINDOW
WEL_WINDOW
require WEL_WINDOW
exists: exists
has_capture: BOOLEAN
WEL_WINDOW
require WEL_WINDOW
exists: exists
has_focus: BOOLEAN
WEL_WINDOW
require WEL_WINDOW
exists: exists
has_heavy_capture: BOOLEAN
WEL_WINDOW
has_horizontal_scroll_bar: BOOLEAN
WEL_WINDOW
require WEL_WINDOW
exists: exists
has_menu: BOOLEAN
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
has_system_menu: BOOLEAN
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
has_vertical_scroll_bar: BOOLEAN
WEL_WINDOW
require WEL_WINDOW
exists: exists
heavy_capture_activated: BOOLEAN
has_heavy_capture
WEL_WINDOW
height: INTEGER_32
WEL_WINDOW
require WEL_WINDOW
exists: exists
horizontal_position: INTEGER_32
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_exists: scroller /= Void
ensure WEL_COMPOSITE_WINDOW
result_small_enough: Result <= maximal_horizontal_position
result_large_enough: Result >= minimal_horizontal_position
is_inside: BOOLEAN
WEL_WINDOW
maximal_height: INTEGER_32
WEL_WINDOW
ensure WEL_WINDOW
result_large_enough: Result >= minimal_height
maximal_horizontal_position: INTEGER_32
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_exists: scroller /= Void
ensure WEL_COMPOSITE_WINDOW
result_large_enough: Result >= minimal_horizontal_position
maximal_vertical_position: INTEGER_32
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_exists: scroller /= Void
ensure WEL_COMPOSITE_WINDOW
result_large_enough: Result >= minimal_vertical_position
maximal_width: INTEGER_32
WEL_WINDOW
ensure WEL_WINDOW
result_large_enough: Result >= minimal_width
maximized: BOOLEAN
WEL_WINDOW
require WEL_WINDOW
exists: exists
minimal_height: INTEGER_32
WEL_COMPOSITE_WINDOW
ensure WEL_WINDOW
positive_result: Result >= 0
result_small_enough: Result <= maximal_height
minimal_horizontal_position: INTEGER_32
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_exists: scroller /= Void
ensure WEL_COMPOSITE_WINDOW
result_small_enough: Result <= maximal_horizontal_position
minimal_vertical_position: INTEGER_32
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_exists: scroller /= Void
ensure WEL_COMPOSITE_WINDOW
result_small_enough: Result <= maximal_vertical_position
minimal_width: INTEGER_32
WEL_COMPOSITE_WINDOW
ensure WEL_WINDOW
positive_result: Result >= 0
result_small_enough: Result <= maximal_width
minimized: BOOLEAN
WEL_WINDOW
require WEL_WINDOW
exists: exists
ok_pushed: BOOLEAN
placement: WEL_WINDOW_PLACEMENT
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
result_not_void: Result /= Void
same_type (other: ANY): BOOLEAN
`other'
ANY
require ANY
other_not_void: other /= Void
ensure ANY
definition: Result = (conforms_to (other) and other.conforms_to (Current))
shared: BOOLEAN
item
item
destroy_item
item
WEL_ANY
shown: BOOLEAN
WEL_WINDOW
require WEL_WINDOW
exists: exists
style: INTEGER_32
WEL_WINDOW
require WEL_WINDOW
exists: exists
text: STRING_32
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
result_not_void: Result /= Void
text_length: INTEGER_32
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
positive_result: Result >= 0
vertical_position: INTEGER_32
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_exists: scroller /= Void
ensure WEL_COMPOSITE_WINDOW
result_small_enough: Result <= maximal_vertical_position
result_large_enough: Result >= minimal_vertical_position
width: INTEGER_32
WEL_WINDOW
require WEL_WINDOW
exists: exists
window_captured: BOOLEAN
WEL_WINDOW
window_rect: WEL_RECT
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
result_not_void: Result /= Void
x: INTEGER_32
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
parent = Void implies Result = absolute_x
y: INTEGER_32
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
parent = Void implies Result = absolute_y
feature {ANY}
valid_hwnd_constant (c: POINTER): BOOLEAN
`c'
WEL_HWND_CONSTANTS
feature
disable
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
disabled: not enabled
disable_commands
WEL_WINDOW
ensure WEL_WINDOW
commands_disabled: not commands_enabled
disable_default_processing
WEL_WINDOW
ensure WEL_WINDOW
default_processing_disabled: not default_processing
disable_drag_accept_files
`Current'
WEL_WINDOW
require WEL_WINDOW
exists
enable
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
enabled: enabled
enable_commands
WEL_WINDOW
ensure WEL_WINDOW
commands_enabled: commands_enabled
enable_default_processing
WEL_WINDOW
ensure WEL_WINDOW
default_processing_enabled: default_processing
enable_drag_accept_files
`Current'
WEL_WINDOW
require WEL_WINDOW
exists
hide
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
hidden: not shown
horizontal_update (inc, position: INTEGER_32)
`inc'`position'
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_not_void: scroller /= Void
position_small_enough: scroller.valid_maximal_horizontal_position (position)
position_large_enough: position >= minimal_horizontal_position
ensure WEL_COMPOSITE_WINDOW
horizontal_position_set: horizontal_position = position
maximize
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
maximized: maximized
minimize
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
minimized: minimized
release_capture
set_capture
WEL_WINDOW
require WEL_WINDOW
exists: exists
has_capture: has_capture
ensure WEL_WINDOW
not_has_capture: not has_capture
release_heavy_capture
set_heavy_capture
WEL_WINDOW
require WEL_WINDOW
exists: exists
has_heavy_capture: has_heavy_capture
heavy_capture_activated: heavy_capture_activated
ensure WEL_WINDOW
heavy_capture_set: not has_heavy_capture
heavy_capture_deactivated: not heavy_capture_activated
restore
minimizemaximize
WEL_WINDOW
require WEL_WINDOW
exists: exists
set_capture
`Current'
WEL_WINDOW
require WEL_WINDOW
exists: exists
has_not_capture: not has_capture
has_not_heavy_capture: not has_heavy_capture
ensure WEL_WINDOW
has_capture: has_capture
set_ex_style (an_ex_style: INTEGER_32)
`an_ex_style'ex_style
WEL_WINDOW
require WEL_WINDOW
exists: exists
set_focus
`Current'
WEL_WINDOW
require WEL_WINDOW
exists: exists
set_heavy_capture
`Current'
WEL_WINDOW
require WEL_WINDOW
exists: exists
has_not_heavy_capture: not has_heavy_capture
heavy_capture_deactivated: not heavy_capture_activated
ensure WEL_WINDOW
heavy_capture_set: has_heavy_capture implies heavy_capture_activated
set_horizontal_position (position: INTEGER_32)
horizontal_position`position'
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_exists: scroller /= Void
position_small_enough: scroller.valid_maximal_horizontal_position (position)
position_large_enough: position >= minimal_horizontal_position
ensure WEL_COMPOSITE_WINDOW
horizontal_position_set: horizontal_position = position
set_horizontal_range (minimum, maximum: INTEGER_32)
minimal_horizontal_position
maximal_horizontal_position`minimum'
`maximum'
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_exists: scroller /= Void
consistent_range: minimum <= maximum
ensure WEL_COMPOSITE_WINDOW
minimal_horizontal_position_set: minimal_horizontal_position = minimum
maximal_horizontal_position_set: maximal_horizontal_position = maximum
set_icon (a_small_icon: WEL_ICON; a_big_icon: WEL_ICON)
`a_small_icon'
`a_big_icon'
WEL_COMPOSITE_WINDOW
set_menu (a_menu: WEL_MENU)
menu`a_menu'
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
a_menu_not_void: a_menu /= Void
a_menu_exists: a_menu.exists
ensure WEL_COMPOSITE_WINDOW
has_menu: has_menu
menu_set: menu.item = a_menu.item
set_shared
shared
WEL_ANY
ensure WEL_ANY
shared: shared
set_style (a_style: INTEGER_32)
style`a_style'
WEL_WINDOW
require WEL_WINDOW
exists: exists
set_unshared
shared
WEL_ANY
ensure WEL_ANY
unshared: not shared
set_vertical_position (position: INTEGER_32)
vertical_position`position'
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_exists: scroller /= Void
position_small_enough: scroller.valid_maximal_vertical_position (position)
position_large_enough: position >= minimal_vertical_position
ensure WEL_COMPOSITE_WINDOW
vertical_position_set: vertical_position = position
set_vertical_range (minimum, maximum: INTEGER_32)
minimal_vertical_position
maximal_vertical_position`minimum'
`maximum'
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_exists: scroller /= Void
consistent_range: minimum <= maximum
ensure WEL_COMPOSITE_WINDOW
minimal_vertical_position_set: minimal_vertical_position = minimum
maximal_vertical_position_set: maximal_vertical_position = maximum
show
WEL_WINDOW
require WEL_WINDOW
exists: exists
unset_menu
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
ensure WEL_COMPOSITE_WINDOW
menu_unset: not has_menu
update_cached_style (new_ex_style, old_ex_style: INTEGER_32)
WEL_WINDOW
vertical_update (inc, position: INTEGER_32)
`inc'`position'
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
scroller_not_void: scroller /= Void
position_small_enough: scroller.valid_maximal_vertical_position (position)
position_large_enough: position >= minimal_vertical_position
ensure WEL_COMPOSITE_WINDOW
vertical_position_set: vertical_position = position
feature
disable_redraw
`Current'enable_redraw
WEL_WINDOW
require WEL_WINDOW
exists: exists
enable_redraw
`Current'
WEL_WINDOW
require WEL_WINDOW
exists: exists
has_system_window_locked: BOOLEAN
WEL_WINDOW
lock_window_update
lock_window_update
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
has_system_window_locked
set_height (a_height: INTEGER_32)
height`a_height'
WEL_WINDOW
require WEL_WINDOW
exists: exists
set_item (an_item: POINTER)
item`an_item'
WEL_ANY
ensure WEL_ANY
item_set: item = an_item
set_parent (a_parent: WEL_WINDOW)
WEL_WINDOW
require WEL_WINDOW
exists: exists
set_placement (a_placement: WEL_WINDOW_PLACEMENT)
placement`a_placement'
WEL_WINDOW
require WEL_WINDOW
exists: exists
a_placement_not_void: a_placement /= Void
set_text (a_text: STRING_GENERAL)
WEL_WINDOW
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
text_set_when_not_void: a_text /= Void implies text.is_equal (a_text)
text_set_when_void: a_text = Void implies text.count = 0
set_timer (timer_id, time_out: INTEGER_32)
`timer_id'
`time_out'
on_timerkill_timer
WEL_WINDOW
require WEL_WINDOW
exists: exists
positive_timer_id: timer_id > 0
positive_time_out: time_out > 0
set_width (a_width: INTEGER_32)
width`a_width'
WEL_WINDOW
require WEL_WINDOW
exists: exists
set_x (a_x: INTEGER_32)
x`a_x'
WEL_WINDOW
require WEL_WINDOW
exists: exists
set_y (a_y: INTEGER_32)
y`a_y'
WEL_WINDOW
require WEL_WINDOW
exists: exists
unlock_window_update
WEL_WINDOW
require WEL_WINDOW
exists: exists
feature
copy (other: like Current)
`other'
ANY
require ANY
other_not_void: other /= Void
type_identity: same_type (other)
ensure ANY
is_equal: is_equal (other)
frozen deep_copy (other: like Current)
copy`other'deep_twin
ANY
require ANY
other_not_void: other /= Void
ensure ANY
deep_equal: deep_equal (Current, other)
frozen deep_twin: like Current
ANY
ensure ANY
deep_equal: deep_equal (Current, Result)
frozen standard_copy (other: like Current)
`other'
ANY
require ANY
other_not_void: other /= Void
type_identity: same_type (other)
ensure ANY
is_standard_equal: standard_is_equal (other)
frozen standard_twin: like Current
`other'
ANY
ensure ANY
standard_twin_not_void: Result /= Void
equal: standard_equal (Result, Current)
frozen twin: like Current
`Current'
twincopycopy
ANY
ensure ANY
twin_not_void: Result /= Void
is_equal: Result.is_equal (Current)
feature
activate
require
parent_exists: parent /= Void implies parent.exists
not_exists: not exists
bring_to_top
WEL_WINDOW
require WEL_WINDOW
exists: exists
frozen default: like Current
ANY
frozen default_pointer: POINTER
`POINTER'
`p'default
`p'`POINTER'
ANY
default_rescue
ANY
destroy
require WEL_WINDOW
exists: exists
ensure WEL_WINDOW
not_exists: not exists
disable_horizontal_scroll_bar
WEL_WINDOW
require WEL_WINDOW
exists: exists
disable_vertical_scroll_bar
WEL_WINDOW
require WEL_WINDOW
exists: exists
frozen do_nothing
ANY
draw_menu
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
has_menu: has_menu
enable_horizontal_scroll_bar
WEL_WINDOW
require WEL_WINDOW
exists: exists
enable_vertical_scroll_bar
WEL_WINDOW
require WEL_WINDOW
exists: exists
hide_horizontal_scroll_bar
WEL_WINDOW
require WEL_WINDOW
exists: exists
hide_scroll_bars
WEL_WINDOW
require WEL_WINDOW
exists: exists
hide_vertical_scroll_bar
WEL_WINDOW
require WEL_WINDOW
exists: exists
insert_after (a_window: WEL_WINDOW)
`a_window'
WEL_WINDOW
require WEL_WINDOW
exists: exists
a_window_not_void: a_window /= Void
a_window_not_current: a_window /= Current
a_window_exists: a_window.exists
invalidate
WEL_WINDOW
require WEL_WINDOW
exists: exists
invalidate_rect (rect: WEL_RECT; erase_background: BOOLEAN)
`rect'
`erase_background'
WEL_WINDOW
require WEL_WINDOW
exists: exists
rect_not_void: rect /= Void
invalidate_region (region: WEL_REGION; erase_background: BOOLEAN)
`region'
`erase_background'
WEL_WINDOW
require WEL_WINDOW
exists: exists
region_not_void: region /= Void
region_exists: region.exists
invalidate_without_background
WEL_WINDOW
require WEL_WINDOW
exists: exists
kill_timer (timer_id: INTEGER_32)
`timer_id'
set_timeron_timer
WEL_WINDOW
require WEL_WINDOW
exists: exists
positive_timer_id: timer_id > 0
move (a_x, a_y: INTEGER_32)
`a_x'`a_y'
WEL_COMPOSITE_WINDOW
require WEL_WINDOW
exists: exists
move_absolute (a_x, a_y: INTEGER_32)
`a_x'`a_y'
WEL_COMPOSITE_WINDOW
require WEL_COMPOSITE_WINDOW
exists: exists
move_and_resize (a_x, a_y, a_width, a_height: INTEGER_32; repaint: BOOLEAN)
`a_x'`a_y'
`a_width'`a_height'
WEL_COMPOSITE_WINDOW
require WEL_WINDOW
exists: exists
on_abort
require
exists: exists
on_cancel
require
exists: exists
on_ignore
require
exists: exists
on_no
require
exists: exists
on_ok
require
exists: exists
on_retry
require
exists: exists
on_yes
require
exists: exists
put_command (a_command: WEL_COMMAND; message: INTEGER_32; argument: ANY)
`a_command'`message'
WEL_WINDOW
require WEL_WINDOW
a_command_not_void: a_command /= Void
positive_message: message >= 0
ensure WEL_WINDOW
command_added: command (message) = a_command and command_argument (message) = argument
remove_command (message: INTEGER_32)
`message'
WEL_WINDOW
require WEL_WINDOW
positive_message: message >= 0
command_exists: command_exists (message)
ensure WEL_WINDOW
command_removed: not command_exists (message)
resize (a_width, a_height: INTEGER_32)
`a_width'`a_height'
WEL_WINDOW
require WEL_WINDOW
exists: exists
scroll (a_x, a_y: INTEGER_32)
`a_x'`a_y'
WEL_WINDOW
require WEL_WINDOW
exists: exists
set_class_icon (new_icon: WEL_ICON)
WEL_WINDOW
set_class_small_icon (new_icon: WEL_ICON)
WEL_WINDOW
set_z_order (z_order: POINTER)
`z_order'
WEL_WINDOW
require WEL_WINDOW
exists: exists
valid_hwnd_constant: valid_hwnd_constant (z_order)
setup_dialog
require
exists: exists
show_horizontal_scroll_bar
WEL_WINDOW
require WEL_WINDOW
exists: exists
show_scroll_bars
WEL_WINDOW
require WEL_WINDOW
exists: exists
show_vertical_scroll_bar
WEL_WINDOW
require WEL_WINDOW
exists: exists
show_with_option (cmd_show: INTEGER_32)
`cmd_show'
`cmd_show'
WEL_WINDOW
require WEL_WINDOW
exists: exists
parent_shown: parent /= Void implies parent.exists and parent.shown
terminate (a_result: INTEGER_32)
`a_result'
result_id`a_result'
require
exists: exists
ensure
result_id_set: result_id = a_result
update
WEL_WINDOW
require WEL_WINDOW
exists: exists
validate
WEL_WINDOW
require WEL_WINDOW
exists: exists
validate_rect (rect: WEL_RECT)
`rect'
WEL_WINDOW
require WEL_WINDOW
exists: exists
rect_not_void: rect /= Void
validate_region (region: WEL_REGION)
`region'
WEL_WINDOW
require WEL_WINDOW
exists: exists
region_not_void: region /= Void
region_exists: region.exists
win_help (help_file: STRING_GENERAL; a_command, data: INTEGER_32)
`help_file'
`a_command'
`a_command'
WEL_WINDOW
require WEL_WINDOW
exists: exists
help_file_not_void: help_file /= Void
feature
set_default_processing (value: BOOLEAN)
WEL_RETURN_VALUE
ensure WEL_RETURN_VALUE
value_set: default_processing = value
set_message_return_value (value: POINTER)
WEL_RETURN_VALUE
ensure WEL_RETURN_VALUE
has_return_value: has_return_value
value_set: message_return_value = value
feature
io: STD_FILES
ANY
out: STRING_8
ANYtagged_out
ANY
print (some: ANY)
`some'
ANY
frozen tagged_out: STRING_8
ANYout
ANY
feature
operating_environment: OPERATING_ENVIRONMENT
ANY
feature
is_registered: BOOLEAN
`window'
WEL_WINDOW
invariant
ANY
reflexive_equality: standard_is_equal (Current)
reflexive_conformance: conforms_to (Current)
indexing
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 WEL_DIALOG