    class
    	WEL_CHOOSE_COLOR_DIALOG

    General
    	cluster: wel
    	description: "Standard dialog box to choose a color."
    	create: make

    Ancestors
    	WEL_BIT_OPERATIONS
    	WEL_CHOOSE_COLOR_CONSTANTS
    	WEL_STANDARD_DIALOG*

    Queries
    	custom_colors: WEL_CUSTOM_COLORS
    	exists: BOOLEAN
    	flags: INTEGER_32
    	full_open_allowed: BOOLEAN
    	has_flag (a_flags: INTEGER_32): BOOLEAN
    	is_equal (other: [like Current] WEL_CHOOSE_COLOR_DIALOG): BOOLEAN
    	item: POINTER
    	rgb_result: WEL_COLOR_REF
    	selected: BOOLEAN
    	shared: BOOLEAN
    	Structure_size: INTEGER_32

    Commands
    	activate (a_parent: WEL_COMPOSITE_WINDOW)
    	add_flag (a_flags: INTEGER_32)
    	allow_full_open
    	copy (other: [like Current] WEL_CHOOSE_COLOR_DIALOG)
    	dispose
    	initialize_with_character (a_character: CHARACTER_8)
    	memory_copy (source_pointer: POINTER; length: INTEGER_32)
    	prevent_full_open
    	remove_flag (a_flags: INTEGER_32)
    	set_custom_colors (a_custom_colors: WEL_CUSTOM_COLORS)
    	set_flags (a_flags: INTEGER_32)
    	set_item (an_item: POINTER)
    	set_rgb_result (color: WEL_COLOR_REF)
    	set_shared
    	set_unshared
    	structure_initialize