note
	description: "[
					Windows that used for notify EV_APPLICATION_IMP theme change actions.
					This is a invisible window.
																						]"
	date: "$Date$"
	revision: "$Revision$"

class
	EV_THEME_WINDOW

inherit
	WEL_FRAME_WINDOW
		redefine
			on_wm_theme_changed,
			on_wm_syscolor_change
		end

	EV_ANY_HANDLER

create
	make

feature {NONE} -- Initlixation

	make
			-- Creation method
		do
			register_class
			internal_window_make (Void, "",
				default_style,
				0, 0,
				0, 0,
				0, default_pointer)
		end

feature -- Implementation

	on_wm_theme_changed
			-- Redefine
		local
			l_env: EV_ENVIRONMENT
		do
			create l_env
			l_env.implementation.application_i.theme_changed_actions.call (Void)
		end

	on_wm_syscolor_change
			-- Redefine
		local
			l_env: EV_ENVIRONMENT
			l_app_i: EV_APPLICATION_I
		do
			Precursor {WEL_FRAME_WINDOW}

			create l_env
			-- We use EV_APPLICATION_I instead of EV_APPLICATION since
			-- system_color_change_actions not implementated on GTK.
			l_app_i := l_env.implementation.application_i
			l_app_i.system_color_change_actions.call (Void)
		end

end