note status: "See notice at end of class."; date: "$Date$"; revision: "$Revision$" deferred class SCREEN_I inherit DRAWING_I feature buttons: BUTTONS -- Current state of the mouse buttons deferred ensure result_not_void: Result /= Void end; screen_object: POINTER -- Screen object associated deferred end; widget_pointed: WIDGET -- Widget currently pointed by the pointer deferred end; width: INTEGER -- Width of screen (in pixel) deferred ensure width_large_enough: Result >= 0 end; height: INTEGER -- Height of screen (in pixel) deferred ensure height_large_enough: Result >= 0 end; visible_width: INTEGER -- Width of the visible part of the screen (in pixel) deferred ensure visible_width_large_enough: Result >= 0 end; visible_height: INTEGER -- Height of the visible part of the screen (in pixel) deferred ensure visible_height_large_enough: Result >= 0 end; x: INTEGER -- Current absolute horizontal coordinate of the mouse deferred ensure position_positive: Result >= 0; position_small_enough: Result < width end; y: INTEGER -- Current absolute vertical coordinate of the mouse deferred ensure position_positive: Result >= 0; position_small_enough: Result < height end; is_valid: BOOLEAN -- Is Current screen created? deferred 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 -- class SCREEN_I