    class
    	EV_CLIPBOARD_IMP

    General
    	cluster: implementation_mswin
    	description:
    		"Objects that allow access to the operating
    		system clipboard."
    	create: make

    Ancestors
    	EV_CLIPBOARD_I*
    	WEL_CLIPBOARD

    Queries
    	clipboard_open: BOOLEAN
    	has_text: BOOLEAN
    	is_clipboard_format_available (format: INTEGER_32): BOOLEAN
    	last_string: STRING_32
    	text: STRING_32

    Commands
    	close_clipboard
    	empty_clipboard
    	open_clipboard (window: WEL_WINDOW)
    	retrieve_clipboard_text
    	set_clipboard_text (a_text: STRING_GENERAL)
    	set_text (a_text: STRING_GENERAL)