    class
    	EV_POINTER_STYLE_CONSTANTS

    General
    	cluster: interface
    	description: "Pointer sytle constants"
    	keywords: "pixmap, cursor, default, pointer style"

    Ancestors
    	ANY

    Queries
    	Busy_cursor: INTEGER_32
    	Crosshair_cursor: INTEGER_32
    	Help_cursor: INTEGER_32
    	Ibeam_cursor: INTEGER_32
    	is_valid (a_integer: INTEGER_32): BOOLEAN
    	No_cursor: INTEGER_32
    	Sizeall_cursor: INTEGER_32
    	Sizenesw_cursor: INTEGER_32
    	Sizens_cursor: INTEGER_32
    	Sizenwse_cursor: INTEGER_32
    	Sizewe_cursor: INTEGER_32
    	Standard_cursor: INTEGER_32
    	Uparrow_cursor: INTEGER_32
    	Wait_cursor: INTEGER_32