INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES

indexing

title: "Class to share the application%'s main window object. ", "WEL: library of reusable components for Eiffel. ", "Based on WEL library for ISE Eiffel, used with permission. "
project: "Windows Eiffel Library"
copyright: "(c) 1986-1997 Interactive Software Engineering Inc. ", "Modifications and extensions: ", "(c) 1997 Object Tools ", "All rights reserved. Duplication and distribution prohibited", "May be used only with Visual Eiffel under terms of user ", "license "
cluster: wel
class WEL_APPLICATION_MAIN_WINDOW
feature -- Access

application_main_window: WEL_COMPOSITE_WINDOW
-- Application's main window

application: WEL_APPLICATION
-- Current application
feature -- Status report

is_application_main_window (window: WEL_COMPOSITE_WINDOW): BOOLEAN
-- Is `window' the application's main window?
require
window_not_void: window /= void
ensure
Result = (window = application_main_window)
end -- class WEL_APPLICATION_MAIN_WINDOW

INDEX CLUSTER FEATURES SHORT FRAMES NO FRAMES