SYSTEM
This class provides access to platform specific information and the current version of the Library. Whenever you need some system information (e.g. the screen width) look at this class.
gui_major_version : INTEGER gui_minor_version : INTEGER
Return the major and minor versions of the GRAPE library.
current_platform : INTEGER
Return one of the predefined constants identifying the underlying platform. Under Microsoft Windows this feature returns constant MS_WINDOWS that means Windows 3.1 with Win32s, Windows 95, or Windows NT.
screen_width : INTEGER screen_height : INTEGER
Return the width/height of the screen resolution which is currently used in screen pixels.
move_to_center is -- center tile object inside display local sys_metrics : SYSTEM cw, ch : INTEGER do !!sys_metrics cw := sys_metrics.screen_width /2; ch := sys_metrics.screen_height /2; move (cw-prect.w/2, ch-prect.h/2); end;