Automatic generation produced by ISE Eiffel
note description: "[ Enhancement of the toolbar. This toolbar appears flat and use imagelist to store bitmaps - Win95+IE3 required Note: The common controls dll (WEL_COMMON_CONTROLS_DLL) needs to be loaded to use this control and IE3 or above installed. ]" legal: "See notice at end of class." status: "See notice at end of class." date: "$Date: 2013-11-19 16:34:28 -0900 (Tue, 19 Nov 2013) $" revision: "$Revision: 93466 $" class interface WEL_IMAGELIST_TOOL_BAR create make (a_parent: WEL_WINDOW; an_id: INTEGER_32) -- Create a toolbar with a_parent as parent and -- an_id as id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR a_parent_not_void: a_parent /= Void a_parent_exists: a_parent.exists ensure -- from WEL_TOOL_BAR exists: exists parent_set: parent = a_parent id_set: id = an_id feature -- Access bitmaps_height: INTEGER_32 -- height of all bitmaps located in this imageList require exists: exists bitmaps_width: INTEGER_32 -- width of all bitmaps located in this imageList require exists: exists buttons_height: INTEGER_32 -- Height of the buttons in the toolbar. require exists: exists buttons_width: INTEGER_32 -- Width of the buttons in the toolbar. require exists: exists Command_line: STRING_32 -- Command line argument received in WinMain -- (from WEL_MAIN_ARGUMENTS) ensure -- from WEL_MAIN_ARGUMENTS result_not_void: Result /= Void Command_show: INTEGER_32 -- Command show argument received in WinMain -- (from WEL_MAIN_ARGUMENTS) commands: detachable WEL_COMMAND_MANAGER -- Command manager associated to the current window. -- (from WEL_WINDOW) Current_instance: WEL_INSTANCE -- Current instance argument received in WinMain -- Was declared in {WEL_MAIN_ARGUMENTS} as synonym of `resource_instance`. -- (from WEL_MAIN_ARGUMENTS) ensure -- from WEL_MAIN_ARGUMENTS result_not_void: Result /= Void default_processing: BOOLEAN -- (from WEL_RETURN_VALUE) font: WEL_FONT -- Font with which the control is drawing its text. -- (from WEL_CONTROL) require -- from WEL_CONTROL exists: exists ensure -- from WEL_CONTROL result_not_void: Result /= Void generating_type: TYPE [detachable WEL_IMAGELIST_TOOL_BAR] -- Type of current object -- (type of which it is a direct instance) -- (from ANY) ensure -- from ANY generating_type_not_void: Result /= Void generator: STRING_8 -- Name of current object's generating class -- (base class of the type of which it is a direct instance) -- (from ANY) ensure -- from ANY generator_not_void: Result /= Void generator_not_empty: not Result.is_empty Gwl_exstyle: INTEGER_32 = -20 -- (from WEL_GWL_CONSTANTS) Gwl_style: INTEGER_32 = -16 -- (from WEL_GWL_CONSTANTS) has_return_value: BOOLEAN -- Should the window procedure return a value? -- (from WEL_RETURN_VALUE) frozen hwnd_bottom: POINTER -- (from WEL_HWND_CONSTANTS) frozen hwnd_broadcast: POINTER -- (from WEL_HWND_CONSTANTS) frozen hwnd_message: POINTER -- (from WEL_HWND_CONSTANTS) frozen hwnd_notopmost: POINTER -- (from WEL_HWND_CONSTANTS) frozen hwnd_top: POINTER -- (from WEL_HWND_CONSTANTS) frozen hwnd_topmost: POINTER -- (from WEL_HWND_CONSTANTS) id: INTEGER_32 -- Control id -- (from WEL_CONTROL) Idabort: INTEGER_32 = 3 -- Abort button was selected. -- (from WEL_ID_CONSTANTS) Idcancel: INTEGER_32 = 2 -- Cancel button was selected. -- (from WEL_ID_CONSTANTS) Idignore: INTEGER_32 = 5 -- Ignore button was selected. -- (from WEL_ID_CONSTANTS) Idno: INTEGER_32 = 7 -- No button was selected. -- (from WEL_ID_CONSTANTS) Idok: INTEGER_32 = 1 -- OK button was selected. -- (from WEL_ID_CONSTANTS) Idretry: INTEGER_32 = 4 -- Retry button was selected. -- (from WEL_ID_CONSTANTS) Idyes: INTEGER_32 = 6 -- Yes button was selected. -- (from WEL_ID_CONSTANTS) item: POINTER -- Generic Windows handle or structure pointer. -- Can be a HWND, HICON, RECT *, WNDCLASS *, etc... -- (from WEL_ANY) Mb_abortretryignore: INTEGER_32 = 2 -- (from WEL_MB_CONSTANTS) Mb_applmodal: INTEGER_32 = 0 -- (from WEL_MB_CONSTANTS) Mb_default_desktop_only: INTEGER_32 = 131072 -- (from WEL_MB_CONSTANTS) Mb_defbutton1: INTEGER_32 = 0 -- (from WEL_MB_CONSTANTS) Mb_defbutton2: INTEGER_32 = 256 -- (from WEL_MB_CONSTANTS) Mb_defbutton3: INTEGER_32 = 512 -- (from WEL_MB_CONSTANTS) Mb_defmask: INTEGER_32 = 3840 -- (from WEL_MB_CONSTANTS) Mb_help: INTEGER_32 = 16384 -- (from WEL_MB_CONSTANTS) Mb_iconasterisk: INTEGER_32 = 64 -- (from WEL_MB_CONSTANTS) Mb_iconerror: INTEGER_32 = 16 -- Same as `mb_iconhand`. -- (from WEL_MB_CONSTANTS) Mb_iconexclamation: INTEGER_32 = 48 -- (from WEL_MB_CONSTANTS) Mb_iconhand: INTEGER_32 = 16 -- (from WEL_MB_CONSTANTS) Mb_iconinformation: INTEGER_32 = 64 -- Same as `mb_iconasterisk`. -- (from WEL_MB_CONSTANTS) Mb_iconmask: INTEGER_32 = 240 -- (from WEL_MB_CONSTANTS) Mb_iconquestion: INTEGER_32 = 32 -- (from WEL_MB_CONSTANTS) Mb_iconstop: INTEGER_32 = 16 -- Same as `mb_iconhand`. -- (from WEL_MB_CONSTANTS) Mb_iconwarning: INTEGER_32 = 48 -- Same as `mb_iconexclamation`. -- (from WEL_MB_CONSTANTS) Mb_nofocus: INTEGER_32 = 32768 -- (from WEL_MB_CONSTANTS) Mb_ok: INTEGER_32 = 0 -- (from WEL_MB_CONSTANTS) Mb_okcancel: INTEGER_32 = 1 -- (from WEL_MB_CONSTANTS) Mb_retrycancel: INTEGER_32 = 5 -- (from WEL_MB_CONSTANTS) Mb_right: INTEGER_32 = 524288 -- (from WEL_MB_CONSTANTS) Mb_rtlreading: INTEGER_32 = 1048576 -- (from WEL_MB_CONSTANTS) Mb_setforeground: INTEGER_32 = 65536 -- (from WEL_MB_CONSTANTS) Mb_systemmodal: INTEGER_32 = 4096 -- (from WEL_MB_CONSTANTS) Mb_taskmodal: INTEGER_32 = 8192 -- (from WEL_MB_CONSTANTS) Mb_topmost: INTEGER_32 = 262144 -- (from WEL_MB_CONSTANTS) Mb_typemask: INTEGER_32 = 15 -- (from WEL_MB_CONSTANTS) Mb_usericon: INTEGER_32 = 128 -- (from WEL_MB_CONSTANTS) Mb_yesno: INTEGER_32 = 4 -- (from WEL_MB_CONSTANTS) Mb_yesnocancel: INTEGER_32 = 3 -- (from WEL_MB_CONSTANTS) message_return_value: POINTER -- Return value of the window procedure. -- (from WEL_RETURN_VALUE) require -- from WEL_RETURN_VALUE has_return_value: has_return_value parent: detachable WEL_WINDOW -- Parent window -- (from WEL_WINDOW) Previous_instance: WEL_INSTANCE -- Previous instance argument received in WinMain -- (from WEL_MAIN_ARGUMENTS) ensure -- from WEL_MAIN_ARGUMENTS result_not_void: Result /= Void Resource_instance: WEL_INSTANCE -- Current instance argument received in WinMain -- Was declared in {WEL_MAIN_ARGUMENTS} as synonym of `current_instance`. -- (from WEL_MAIN_ARGUMENTS) ensure -- from WEL_MAIN_ARGUMENTS result_not_void: Result /= Void Sb_both: INTEGER_32 = 3 -- Declared in Windows as SB_BOTH -- (from WEL_SB_CONSTANTS) Sb_bottom: INTEGER_32 = 7 -- Declared in Windows as SB_BOTTOM -- (from WEL_SB_CONSTANTS) Sb_ctl: INTEGER_32 = 2 -- Declared in Windows as SB_CTL -- (from WEL_SB_CONSTANTS) Sb_endscroll: INTEGER_32 = 8 -- Declared in Windows as SB_ENDSCROLL -- (from WEL_SB_CONSTANTS) Sb_horz: INTEGER_32 = 0 -- Declared in Windows as SB_HORZ -- (from WEL_SB_CONSTANTS) Sb_left: INTEGER_32 = 6 -- Declared in Windows as SB_LEFT -- (from WEL_SB_CONSTANTS) Sb_linedown: INTEGER_32 = 1 -- Declared in Windows as SB_LINEDOWN -- (from WEL_SB_CONSTANTS) Sb_lineleft: INTEGER_32 = 0 -- Declared in Windows as SB_LINELEFT -- (from WEL_SB_CONSTANTS) Sb_lineright: INTEGER_32 = 1 -- Declared in Windows as SB_LINERIGHT -- (from WEL_SB_CONSTANTS) Sb_lineup: INTEGER_32 = 0 -- Declared in Windows as SB_LINEUP -- (from WEL_SB_CONSTANTS) Sb_pagedown: INTEGER_32 = 3 -- Declared in Windows as SB_PAGEDOWN -- (from WEL_SB_CONSTANTS) Sb_pageleft: INTEGER_32 = 2 -- Declared in Windows as SB_PAGELEFT -- (from WEL_SB_CONSTANTS) Sb_pageright: INTEGER_32 = 3 -- Declared in Windows as SB_PAGERIGHT -- (from WEL_SB_CONSTANTS) Sb_pageup: INTEGER_32 = 2 -- Declared in Windows as SB_PAGEUP -- (from WEL_SB_CONSTANTS) Sb_right: INTEGER_32 = 7 -- Declared in Windows as SB_RIGHT -- (from WEL_SB_CONSTANTS) Sb_thumbposition: INTEGER_32 = 4 -- Declared in Windows as SB_THUMBPOSITION -- (from WEL_SB_CONSTANTS) Sb_thumbtrack: INTEGER_32 = 5 -- Declared in Windows as SB_THUMBTRACK -- (from WEL_SB_CONSTANTS) Sb_top: INTEGER_32 = 6 -- Declared in Windows as SB_TOP -- (from WEL_SB_CONSTANTS) Sb_vert: INTEGER_32 = 1 -- Declared in Windows as SB_VERT -- (from WEL_SB_CONSTANTS) silly_window: WEL_SILLY_WINDOW -- Window that receives some private messages for WEL to work properly. -- (from WEL_RESIZING_SUPPORT) Sm_cmetrics: INTEGER_32 = 76 -- (from WEL_SM_CONSTANTS) Sm_cmonitors: INTEGER_32 = 80 -- (from WEL_SM_CONSTANTS) Sm_cxborder: INTEGER_32 = 5 -- (from WEL_SM_CONSTANTS) Sm_cxcursor: INTEGER_32 = 13 -- (from WEL_SM_CONSTANTS) Sm_cxdlgframe: INTEGER_32 = 7 -- (from WEL_SM_CONSTANTS) Sm_cxdoubleclk: INTEGER_32 = 36 -- (from WEL_SM_CONSTANTS) Sm_cxframe: INTEGER_32 = 32 -- (from WEL_SM_CONSTANTS) Sm_cxfullscreen: INTEGER_32 = 16 -- (from WEL_SM_CONSTANTS) Sm_cxhscroll: INTEGER_32 = 21 -- (from WEL_SM_CONSTANTS) Sm_cxhthumb: INTEGER_32 = 10 -- (from WEL_SM_CONSTANTS) Sm_cxicon: INTEGER_32 = 11 -- (from WEL_SM_CONSTANTS) Sm_cxiconspacing: INTEGER_32 = 38 -- (from WEL_SM_CONSTANTS) Sm_cxmaximized: INTEGER_32 = 61 -- (from WEL_SM_CONSTANTS) Sm_cxmenucheck: INTEGER_32 = 71 -- (from WEL_SM_CONSTANTS) Sm_cxmin: INTEGER_32 = 28 -- (from WEL_SM_CONSTANTS) Sm_cxmintrack: INTEGER_32 = 34 -- (from WEL_SM_CONSTANTS) Sm_cxscreen: INTEGER_32 = 0 -- (from WEL_SM_CONSTANTS) Sm_cxsize: INTEGER_32 = 30 -- (from WEL_SM_CONSTANTS) Sm_cxvirtualscreen: INTEGER_32 = 78 -- (from WEL_SM_CONSTANTS) Sm_cxvscroll: INTEGER_32 = 2 -- (from WEL_SM_CONSTANTS) Sm_cyborder: INTEGER_32 = 6 -- (from WEL_SM_CONSTANTS) Sm_cycaption: INTEGER_32 = 4 -- (from WEL_SM_CONSTANTS) Sm_cycursor: INTEGER_32 = 14 -- (from WEL_SM_CONSTANTS) Sm_cydlgframe: INTEGER_32 = 8 -- (from WEL_SM_CONSTANTS) Sm_cydoubleclk: INTEGER_32 = 37 -- (from WEL_SM_CONSTANTS) Sm_cyframe: INTEGER_32 = 33 -- (from WEL_SM_CONSTANTS) Sm_cyfullscreen: INTEGER_32 = 17 -- (from WEL_SM_CONSTANTS) Sm_cyhscroll: INTEGER_32 = 3 -- (from WEL_SM_CONSTANTS) Sm_cyicon: INTEGER_32 = 12 -- (from WEL_SM_CONSTANTS) Sm_cyiconspacing: INTEGER_32 = 39 -- (from WEL_SM_CONSTANTS) Sm_cykanjiwindow: INTEGER_32 = 18 -- (from WEL_SM_CONSTANTS) Sm_cymaximized: INTEGER_32 = 62 -- (from WEL_SM_CONSTANTS) Sm_cymenu: INTEGER_32 = 15 -- (from WEL_SM_CONSTANTS) Sm_cymenucheck: INTEGER_32 = 72 -- (from WEL_SM_CONSTANTS) Sm_cymin: INTEGER_32 = 29 -- (from WEL_SM_CONSTANTS) Sm_cymintrack: INTEGER_32 = 35 -- (from WEL_SM_CONSTANTS) Sm_cyscreen: INTEGER_32 = 1 -- (from WEL_SM_CONSTANTS) Sm_cysize: INTEGER_32 = 31 -- (from WEL_SM_CONSTANTS) Sm_cyvirtualscreen: INTEGER_32 = 79 -- (from WEL_SM_CONSTANTS) Sm_cyvscroll: INTEGER_32 = 20 -- (from WEL_SM_CONSTANTS) Sm_cyvthumb: INTEGER_32 = 9 -- (from WEL_SM_CONSTANTS) Sm_dbcsenabled: INTEGER_32 = 42 -- (from WEL_SM_CONSTANTS) Sm_debug: INTEGER_32 = 22 -- (from WEL_SM_CONSTANTS) Sm_immenabled: INTEGER_32 = 82 -- (from WEL_SM_CONSTANTS) Sm_menudropalignment: INTEGER_32 = 40 -- (from WEL_SM_CONSTANTS) Sm_mousepresent: INTEGER_32 = 19 -- (from WEL_SM_CONSTANTS) Sm_mousewheelpresent: INTEGER_32 = 75 -- (from WEL_SM_CONSTANTS) Sm_penwindows: INTEGER_32 = 41 -- (from WEL_SM_CONSTANTS) Sm_remotesession: INTEGER_32 = 4096 -- (from WEL_SM_CONSTANTS) Sm_reserved1: INTEGER_32 = 24 -- (from WEL_SM_CONSTANTS) Sm_reserved2: INTEGER_32 = 25 -- (from WEL_SM_CONSTANTS) Sm_reserved3: INTEGER_32 = 26 -- (from WEL_SM_CONSTANTS) Sm_reserved4: INTEGER_32 = 27 -- (from WEL_SM_CONSTANTS) Sm_swapbutton: INTEGER_32 = 23 -- (from WEL_SM_CONSTANTS) Sm_xvirtualscreen: INTEGER_32 = 76 -- (from WEL_SM_CONSTANTS) Sm_yvirtualscreen: INTEGER_32 = 77 -- (from WEL_SM_CONSTANTS) Sw_hide: INTEGER_32 = 0 -- Declared in Windows as SW_HIDE -- (from WEL_SW_CONSTANTS) Sw_minimize: INTEGER_32 = 6 -- Declared in Windows as SW_MINIMIZE -- (from WEL_SW_CONSTANTS) Sw_otherunzoom: INTEGER_32 = 4 -- Declared in Windows as SW_OTHERUNZOOM -- (from WEL_SW_CONSTANTS) Sw_otherzoom: INTEGER_32 = 2 -- Declared in Windows as SW_OTHERZOOM -- (from WEL_SW_CONSTANTS) Sw_parentclosing: INTEGER_32 = 1 -- Declared in Windows as SW_PARENTCLOSING -- (from WEL_SW_CONSTANTS) Sw_parentopening: INTEGER_32 = 3 -- Declared in Windows as SW_PARENTOPENING -- (from WEL_SW_CONSTANTS) Sw_restore: INTEGER_32 = 9 -- Declared in Windows as SW_RESTORE -- (from WEL_SW_CONSTANTS) Sw_show: INTEGER_32 = 5 -- Declared in Windows as SW_SHOW -- (from WEL_SW_CONSTANTS) Sw_showmaximized: INTEGER_32 = 3 -- Declared in Windows as SW_SHOWMAXIMIZED -- (from WEL_SW_CONSTANTS) Sw_showminimized: INTEGER_32 = 2 -- Declared in Windows as SW_SHOWMINIMIZED -- (from WEL_SW_CONSTANTS) Sw_showminnoactive: INTEGER_32 = 7 -- Declared in Windows as SW_SHOWMINNOACTIVE -- (from WEL_SW_CONSTANTS) Sw_showna: INTEGER_32 = 8 -- Declared in Windows as SW_SHOWNA -- (from WEL_SW_CONSTANTS) Sw_shownoactivate: INTEGER_32 = 4 -- Declared in Windows as SW_SHOWNOACTIVATE -- (from WEL_SW_CONSTANTS) Sw_shownormal: INTEGER_32 = 1 -- Declared in Windows as SW_SHOWNORMAL -- (from WEL_SW_CONSTANTS) Swp_asyncwindowpos: INTEGER_32 = 16384 -- If the calling thread and the thread that owns the window are attached -- to different input queues, the system posts the request to the thread-- -- that owns the window. This prevents the calling thread from blocking -- its execution while other threads process the request. -- (from WEL_SWP_CONSTANTS) Swp_defererase: INTEGER_32 = 8192 -- Prevents generation of the WM_SYNCPAINT message. -- (from WEL_SWP_CONSTANTS) Swp_drawframe: INTEGER_32 = 32 -- Same as `swp_framechanged`. -- (from WEL_SWP_CONSTANTS) Swp_framechanged: INTEGER_32 = 32 -- Frame changed: send WM_NCCALCSIZE. -- (from WEL_SWP_CONSTANTS) Swp_hidewindow: INTEGER_32 = 128 -- (from WEL_SWP_CONSTANTS) Swp_noactivate: INTEGER_32 = 16 -- (from WEL_SWP_CONSTANTS) Swp_nocopybits: INTEGER_32 = 256 -- (from WEL_SWP_CONSTANTS) Swp_nomove: INTEGER_32 = 2 -- (from WEL_SWP_CONSTANTS) Swp_noownerzorder: INTEGER_32 = 512 -- (from WEL_SWP_CONSTANTS) Swp_noredraw: INTEGER_32 = 8 -- (from WEL_SWP_CONSTANTS) Swp_noreposition: INTEGER_32 = 512 -- Same as Swp_noownerzborder. -- (from WEL_SWP_CONSTANTS) Swp_nosendchanging: INTEGER_32 = 1024 -- Don't send WM_WINDOWPOSCHANGING. -- (from WEL_SWP_CONSTANTS) Swp_nosize: INTEGER_32 = 1 -- (from WEL_SWP_CONSTANTS) Swp_nozorder: INTEGER_32 = 4 -- (from WEL_SWP_CONSTANTS) Swp_showwindow: INTEGER_32 = 64 -- (from WEL_SWP_CONSTANTS) Tb_addbitmap: INTEGER_32 = 1043 -- Adds one or more images to the list of button images available -- for a toolbar. -- (from WEL_TB_CONSTANTS) Tb_addbuttons: INTEGER_32 = 1044 -- Adds one or more buttons to a toolbar. -- (from WEL_TB_CONSTANTS) Tb_addstring: INTEGER_32 = 1101 -- Adds a new string to the toolbar's string pool. -- (ANSI Version) -- (from WEL_TB_CONSTANTS) Tb_autosize: INTEGER_32 = 1057 -- Causes a toolbar to be resized. -- (from WEL_TB_CONSTANTS) Tb_buttoncount: INTEGER_32 = 1048 -- Retrieves a count of the buttons currently in the toolbar. -- (from WEL_TB_CONSTANTS) Tb_buttonstructsize: INTEGER_32 = 1054 -- Specifies the size of the TBBUTTON structure. -- (from WEL_TB_CONSTANTS) Tb_changebitmap: INTEGER_32 = 1067 -- Changes the bitmap for a button in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_checkbutton: INTEGER_32 = 1026 -- Checks or unchecks a given button in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_commandtoindex: INTEGER_32 = 1049 -- Retrieves the zero-based index for the button associated with the -- specified command identifier. -- (from WEL_TB_CONSTANTS) Tb_customize: INTEGER_32 = 1051 -- Displays the Customize Toolbar dialog box. -- (from WEL_TB_CONSTANTS) Tb_deletebutton: INTEGER_32 = 1046 -- Deletes a button from the toolbar. -- (from WEL_TB_CONSTANTS) Tb_enablebutton: INTEGER_32 = 1025 -- Enables or disables the specified button in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_getbitmap: INTEGER_32 = 1068 -- Retrieves the index of the bitmap associated with a button -- in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_getbitmapflags: INTEGER_32 = 1065 -- Retrieves the flags that describe the type of bitmap to be used. -- (from WEL_TB_CONSTANTS) Tb_getbutton: INTEGER_32 = 1047 -- Retrieves information about the specified button in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_getbuttontext: INTEGER_32 = 1099 -- Retrieves the display text of a button on a toolbar. -- (from WEL_TB_CONSTANTS) Tb_getitemrect: INTEGER_32 = 1053 -- Retrieves the bounding rectangle of a button in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_getrows: INTEGER_32 = 1064 -- Retrieves the number of rows of buttons in a toolbar with the -- TBSTYLE_WRAPABLE style. -- (from WEL_TB_CONSTANTS) Tb_getstate: INTEGER_32 = 1042 -- Retrieves information about the state of the specified button -- in a toolbar, such as whether it is enabled, pressed, or checked. -- (from WEL_TB_CONSTANTS) Tb_gettooltips: INTEGER_32 = 1059 -- Retrieves the handle to the tooltip control, if any, associated -- with the toolbar. -- (from WEL_TB_CONSTANTS) Tb_hidebutton: INTEGER_32 = 1028 -- Hides or shows the specified button in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_hittest: INTEGER_32 = 1093 -- Determines where a point lies in a toolbar control. -- (from WEL_TB_CONSTANTS) Tb_indeterminate: INTEGER_32 = 1029 -- Sets or clears the indeterminate state of the specified button -- in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_insertbutton: INTEGER_32 = 1045 -- Inserts a button in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_isbuttonchecked: INTEGER_32 = 1034 -- Determines whether the specified button in a toolbar is checked. -- (from WEL_TB_CONSTANTS) Tb_isbuttonenabled: INTEGER_32 = 1033 -- Determines whether the specified button in a toolbar is enabled. -- (from WEL_TB_CONSTANTS) Tb_isbuttonhidden: INTEGER_32 = 1036 -- Determines whether the specified button in a toolbar is hidden. -- (from WEL_TB_CONSTANTS) Tb_isbuttonindeterminate: INTEGER_32 = 1037 -- Determines whether the specified button in a toolbar is indeterminate. -- (from WEL_TB_CONSTANTS) Tb_isbuttonpressed: INTEGER_32 = 1035 -- Determines whether the specified button in a toolbar is pressed. -- (from WEL_TB_CONSTANTS) Tb_pressbutton: INTEGER_32 = 1027 -- Presses or releases the specified button in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_saverestore: INTEGER_32 = 1100 -- Send this message to initiate saving or restoring a toolbar state. -- (from WEL_TB_CONSTANTS) Tb_setbitmapsize: INTEGER_32 = 1056 -- Sets the size of the bitmapped images to be added to a toolbar. -- (from WEL_TB_CONSTANTS) Tb_setbuttonsize: INTEGER_32 = 1055 -- Sets the size of the buttons to be added to a toolbar. -- (from WEL_TB_CONSTANTS) Tb_setcmdid: INTEGER_32 = 1066 -- Sets the command identifier of a toolbar button. -- (from WEL_TB_CONSTANTS) Tb_setdrawtextflags: INTEGER_32 = 1094 -- Sets the text drawing flags for the toolbar. -- (from WEL_TB_CONSTANTS) Tb_setparent: INTEGER_32 = 1061 -- Sets the window to which the toolbar control sends notification messages. -- (from WEL_TB_CONSTANTS) Tb_setrows: INTEGER_32 = 1063 -- Sets the number of rows of buttons in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_setstate: INTEGER_32 = 1041 -- Sets the state for the specified button in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_settooltips: INTEGER_32 = 1060 -- Associates a tooltip control with a toolbar. -- (from WEL_TB_CONSTANTS) Tbn_beginadjust: INTEGER_32 = -703 -- Declared in Windows as TBN_BEGINADJUST -- (from WEL_TBN_CONSTANTS) Tbn_begindrag: INTEGER_32 = -701 -- Declared in Windows as TBN_BEGINDRAG -- (from WEL_TBN_CONSTANTS) Tbn_custhelp: INTEGER_32 = -709 -- Declared in Windows as TBN_CUSTHELP -- (from WEL_TBN_CONSTANTS) Tbn_dropdown: INTEGER_32 = -710 -- Declared in Windows as TBN_DROPDOWN -- (from WEL_TBN_CONSTANTS) Tbn_endadjust: INTEGER_32 = -704 -- Declared in Windows as TBN_ENDADJUST -- (from WEL_TBN_CONSTANTS) Tbn_enddrag: INTEGER_32 = -702 -- Declared in Windows as TBN_ENDDRAG -- (from WEL_TBN_CONSTANTS) Tbn_getbuttoninfo: INTEGER_32 = -680 -- Declared in Windows as TBN_GETBUTTONINFO -- (from WEL_TBN_CONSTANTS) Tbn_querydelete: INTEGER_32 = -707 -- Declared in Windows as TBN_QUERYDELETE -- (from WEL_TBN_CONSTANTS) Tbn_queryinsert: INTEGER_32 = -706 -- Declared in Windows as TBN_QUERYINSERT -- (from WEL_TBN_CONSTANTS) Tbn_reset: INTEGER_32 = -705 -- Declared in Windows as TBN_RESET -- (from WEL_TBN_CONSTANTS) Tbn_toolbarchange: INTEGER_32 = -708 -- Declared in Windows as TBN_TOOLBARCHANGE -- (from WEL_TBN_CONSTANTS) Wa_active: INTEGER_32 = 1 -- Window gains activation via alt-tab -- (from WEL_WA_CONSTANTS) Wa_clickactive: INTEGER_32 = 2 -- Window gains activation via mouse click -- (from WEL_WA_CONSTANTS) Wa_inactivate: INTEGER_32 = 0 -- Window loses activation -- (from WEL_WA_CONSTANTS) Wm_activate: INTEGER_32 = 6 -- Declared in Windows as WM_ACTIVATE -- (from WEL_WM_CONSTANTS) Wm_activateapp: INTEGER_32 = 28 -- Declared in Windows as WM_ACTIVATEAPP -- (from WEL_WM_CONSTANTS) Wm_afxfirst: INTEGER_32 = 864 -- Declared in Windows as WM_AFXFIRST -- (from WEL_WM_CONSTANTS) Wm_afxlast: INTEGER_32 = 895 -- Declared in Windows as WM_AFXLAST -- (from WEL_WM_CONSTANTS) Wm_app: INTEGER_32 = 32768 -- Declared in Windows as WM_APP -- (from WEL_WM_CONSTANTS) Wm_appcommand: INTEGER_32 = 793 -- Declared in Windows as WM_APPCOMMAND -- (from WEL_WM_CONSTANTS) Wm_askcbformatname: INTEGER_32 = 780 -- Declared in Windows as WM_ASKCBFORMATNAME -- (from WEL_WM_CONSTANTS) Wm_canceljournal: INTEGER_32 = 75 -- Declared in Windows as WM_CANCELJOURNAL -- (from WEL_WM_CONSTANTS) Wm_cancelmode: INTEGER_32 = 31 -- Declared in Windows as WM_CANCELMODE -- (from WEL_WM_CONSTANTS) Wm_capturechanged: INTEGER_32 = 533 -- Declared in Windows as WM_CAPTURECHANGED -- (from WEL_WM_CONSTANTS) Wm_changecbchain: INTEGER_32 = 781 -- Declared in Windows as WM_CHANGECBCHAIN -- (from WEL_WM_CONSTANTS) Wm_changeuistate: INTEGER_32 = 295 -- Declared in Windows as WM_CHANGEUISTATE -- (from WEL_WM_CONSTANTS) Wm_char: INTEGER_32 = 258 -- Declared in Windows as WM_CHAR -- (from WEL_WM_CONSTANTS) Wm_chartoitem: INTEGER_32 = 47 -- Declared in Windows as WM_CHARTOITEM -- (from WEL_WM_CONSTANTS) Wm_childactivate: INTEGER_32 = 34 -- Declared in Windows as WM_CHILDACTIVATE -- (from WEL_WM_CONSTANTS) Wm_clear: INTEGER_32 = 771 -- Declared in Windows as WM_CLEAR -- (from WEL_WM_CONSTANTS) Wm_close: INTEGER_32 = 16 -- Declared in Windows as WM_CLOSE -- (from WEL_WM_CONSTANTS) Wm_command: INTEGER_32 = 273 -- Declared in Windows as WM_COMMAND -- (from WEL_WM_CONSTANTS) Wm_commnotify: INTEGER_32 = 68 -- Declared in Windows as WM_COMMNOTIFY -- (from WEL_WM_CONSTANTS) Wm_compacting: INTEGER_32 = 65 -- Declared in Windows as WM_COMPACTING -- (from WEL_WM_CONSTANTS) Wm_compareitem: INTEGER_32 = 57 -- Declared in Windows as WM_COMPAREITEM -- (from WEL_WM_CONSTANTS) Wm_contextmenu: INTEGER_32 = 123 -- Declared in Windows as WM_CONTEXTMENU -- (from WEL_WM_CONSTANTS) Wm_copy: INTEGER_32 = 769 -- Declared in Windows as WM_COPY -- (from WEL_WM_CONSTANTS) Wm_copydata: INTEGER_32 = 74 -- Declared in Windows as WM_COPYDATA -- (from WEL_WM_CONSTANTS) Wm_create: INTEGER_32 = 1 -- Declared in Windows as WM_CREATE -- (from WEL_WM_CONSTANTS) Wm_ctlcolordialog: INTEGER_32 = 310 -- Declared in Windows as WM_CTLCOLORDIALOG -- (from WEL_WM_CONSTANTS) Wm_cut: INTEGER_32 = 768 -- Declared in Windows as WM_CUT -- (from WEL_WM_CONSTANTS) Wm_deadchar: INTEGER_32 = 259 -- Declared in Windows as WM_DEADCHAR -- (from WEL_WM_CONSTANTS) Wm_deleteitem: INTEGER_32 = 45 -- Declared in Windows as WM_DELETEITEM -- (from WEL_WM_CONSTANTS) Wm_destroy: INTEGER_32 = 2 -- Declared in Windows as WM_DESTROY -- (from WEL_WM_CONSTANTS) Wm_destroyclipboard: INTEGER_32 = 775 -- Declared in Windows as WM_DESTROYCLIPBOARD -- (from WEL_WM_CONSTANTS) Wm_devicechange: INTEGER_32 = 537 -- Declared in Windows as WM_DEVICECHANGE -- (from WEL_WM_CONSTANTS) Wm_devmodechange: INTEGER_32 = 27 -- Declared in Windows as WM_DEVMODECHANGE -- (from WEL_WM_CONSTANTS) Wm_displaychange: INTEGER_32 = 126 -- Declared in Windows as WM_DISPLAYCHANGE -- (from WEL_WM_CONSTANTS) Wm_dpichanged: INTEGER_32 = 736 -- Declared in Windows as WM_DPICHANGED -- (from WEL_WM_CONSTANTS) Wm_drawclipboard: INTEGER_32 = 776 -- Declared in Windows as WM_DRAWCLIPBOARD -- (from WEL_WM_CONSTANTS) Wm_drawitem: INTEGER_32 = 43 -- Declared in Windows as WM_DRAWITEM -- (from WEL_WM_CONSTANTS) Wm_dropfiles: INTEGER_32 = 563 -- Declared in Windows as WM_DROPFILES -- (from WEL_WM_CONSTANTS) Wm_enable: INTEGER_32 = 10 -- Declared in Windows as WM_ENABLE -- (from WEL_WM_CONSTANTS) Wm_endsession: INTEGER_32 = 22 -- Declared in Windows as WM_ENDSESSION -- (from WEL_WM_CONSTANTS) Wm_enteridle: INTEGER_32 = 289 -- Declared in Windows as WM_ENTERIDLE -- (from WEL_WM_CONSTANTS) Wm_entermenuloop: INTEGER_32 = 529 -- Declared in Windows as WM_ENTERMENULOOP -- (from WEL_WM_CONSTANTS) Wm_entersizemove: INTEGER_32 = 561 -- Declared in Windows as WM_ENTERSIZEMOVE -- (from WEL_WM_CONSTANTS) Wm_erasebkgnd: INTEGER_32 = 20 -- Declared in Windows as WM_ERASEBKGND -- (from WEL_WM_CONSTANTS) Wm_exitmenuloop: INTEGER_32 = 530 -- Declared in Windows as WM_EXITMENULOOP -- (from WEL_WM_CONSTANTS) Wm_exitsizemove: INTEGER_32 = 562 -- Declared in Windows as WM_EXITSIZEMOVE -- (from WEL_WM_CONSTANTS) Wm_fontchange: INTEGER_32 = 29 -- Declared in Windows as WM_FONTCHANGE -- (from WEL_WM_CONSTANTS) Wm_getdlgcode: INTEGER_32 = 135 -- Declared in Windows as WM_GETDLGCODE -- (from WEL_WM_CONSTANTS) Wm_getfont: INTEGER_32 = 49 -- Declared in Windows as WM_GETFONT -- (from WEL_WM_CONSTANTS) Wm_gethotkey: INTEGER_32 = 51 -- Declared in Windows as WM_GETHOTKEY -- (from WEL_WM_CONSTANTS) Wm_geticon: INTEGER_32 = 127 -- Declared in Windows as WM_GETICON -- (from WEL_WM_CONSTANTS) Wm_getminmaxinfo: INTEGER_32 = 36 -- Declared in Windows as WM_GETMINMAXINFO -- (from WEL_WM_CONSTANTS) Wm_getobject: INTEGER_32 = 61 -- Declared in Windows as WM_GETOBJECT -- (from WEL_WM_CONSTANTS) Wm_gettext: INTEGER_32 = 13 -- Declared in Windows as WM_GETTEXT -- (from WEL_WM_CONSTANTS) Wm_gettextlength: INTEGER_32 = 14 -- Declared in Windows as WM_GETTEXTLENGTH -- (from WEL_WM_CONSTANTS) Wm_handheldfirst: INTEGER_32 = 856 -- Declared in Windows as WM_HANDHELDFIRST -- (from WEL_WM_CONSTANTS) Wm_handheldlast: INTEGER_32 = 863 -- Declared in Windows as WM_HANDHELDLAST -- (from WEL_WM_CONSTANTS) Wm_help: INTEGER_32 = 83 -- Declared in Windows as WM_HELP -- (from WEL_WM_CONSTANTS) Wm_hotkey: INTEGER_32 = 786 -- Declared in Windows as WM_HOTKEY -- (from WEL_WM_CONSTANTS) Wm_hscroll: INTEGER_32 = 276 -- Declared in Windows as WM_HSCROLL -- (from WEL_WM_CONSTANTS) Wm_hscrollclipboard: INTEGER_32 = 782 -- Declared in Windows as WM_HSCROLLCLIPBOARD -- (from WEL_WM_CONSTANTS) Wm_iconerasebkgnd: INTEGER_32 = 39 -- Declared in Windows as WM_ICONERASEBKGND -- (from WEL_WM_CONSTANTS) Wm_ime_char: INTEGER_32 = 646 -- Declared in Windows as WM_IME_CHAR -- (from WEL_WM_CONSTANTS) Wm_ime_composition: INTEGER_32 = 271 -- Declared in Windows as WM_IME_COMPOSITION -- (from WEL_WM_CONSTANTS) Wm_ime_compositionfull: INTEGER_32 = 644 -- Declared in Windows as WM_IME_COMPOSITIONFULL -- (from WEL_WM_CONSTANTS) Wm_ime_control: INTEGER_32 = 643 -- Declared in Windows as WM_IME_CONTROL -- (from WEL_WM_CONSTANTS) Wm_ime_endcomposition: INTEGER_32 = 270 -- Declared in Windows as WM_IME_ENDCOMPOSITION -- (from WEL_WM_CONSTANTS) Wm_ime_keydown: INTEGER_32 = 656 -- Declared in Windows as WM_IME_KEYDOWN -- (from WEL_WM_CONSTANTS) wm_ime_keylast: INTEGER_32 -- Declared in Windows as WM_IME_KEYLAST -- (from WEL_WM_CONSTANTS) Wm_ime_keyup: INTEGER_32 = 657 -- Declared in Windows as WM_IME_KEYUP -- (from WEL_WM_CONSTANTS) Wm_ime_notify: INTEGER_32 = 642 -- Declared in Windows as WM_IME_NOTIFY -- (from WEL_WM_CONSTANTS) Wm_ime_request: INTEGER_32 = 648 -- Declared in Windows as WM_IME_REQUEST -- (from WEL_WM_CONSTANTS) Wm_ime_select: INTEGER_32 = 645 -- Declared in Windows as WM_IME_SELECT -- (from WEL_WM_CONSTANTS) Wm_ime_setcontext: INTEGER_32 = 641 -- Declared in Windows as WM_IME_SETCONTEXT -- (from WEL_WM_CONSTANTS) Wm_ime_startcomposition: INTEGER_32 = 269 -- Declared in Windows as WM_IME_STARTCOMPOSITION -- (from WEL_WM_CONSTANTS) Wm_initdialog: INTEGER_32 = 272 -- Declared in Windows as WM_INITDIALOG -- (from WEL_WM_CONSTANTS) Wm_initmenu: INTEGER_32 = 278 -- Declared in Windows as WM_INITMENU -- (from WEL_WM_CONSTANTS) Wm_initmenupopup: INTEGER_32 = 279 -- Declared in Windows as WM_INITMENUPOPUP -- (from WEL_WM_CONSTANTS) Wm_inputlangchange: INTEGER_32 = 81 -- Declared in Windows as WM_INPUTLANGCHANGE -- (from WEL_WM_CONSTANTS) Wm_inputlangchangerequest: INTEGER_32 = 80 -- Declared in Windows as WM_INPUTLANGCHANGEREQUEST -- (from WEL_WM_CONSTANTS) Wm_keydown: INTEGER_32 = 256 -- Declared in Windows as WM_KEYDOWN -- (from WEL_WM_CONSTANTS) Wm_keyfirst: INTEGER_32 = 256 -- Declared in Windows as WM_KEYFIRST -- (from WEL_WM_CONSTANTS) wm_keylast: INTEGER_32 -- Declared in Windows as WM_KEYLAST -- (from WEL_WM_CONSTANTS) Wm_keyup: INTEGER_32 = 257 -- Declared in Windows as WM_KEYUP -- (from WEL_WM_CONSTANTS) Wm_killfocus: INTEGER_32 = 8 -- Declared in Windows as WM_KILLFOCUS -- (from WEL_WM_CONSTANTS) Wm_lbuttondblclk: INTEGER_32 = 515 -- Declared in Windows as WM_LBUTTONDBLCLK -- (from WEL_WM_CONSTANTS) Wm_lbuttondown: INTEGER_32 = 513 -- Declared in Windows as WM_LBUTTONDOWN -- (from WEL_WM_CONSTANTS) Wm_lbuttonup: INTEGER_32 = 514 -- Declared in Windows as WM_LBUTTONUP -- (from WEL_WM_CONSTANTS) Wm_mbuttondblclk: INTEGER_32 = 521 -- Declared in Windows as WM_MBUTTONDBLCLK -- (from WEL_WM_CONSTANTS) Wm_mbuttondown: INTEGER_32 = 519 -- Declared in Windows as WM_MBUTTONDOWN -- (from WEL_WM_CONSTANTS) Wm_mbuttonup: INTEGER_32 = 520 -- Declared in Windows as WM_MBUTTONUP -- (from WEL_WM_CONSTANTS) Wm_mdiactivate: INTEGER_32 = 546 -- Declared in Windows as WM_MDIACTIVATE -- (from WEL_WM_CONSTANTS) Wm_mdicascade: INTEGER_32 = 551 -- Declared in Windows as WM_MDICASCADE -- (from WEL_WM_CONSTANTS) Wm_mdicreate: INTEGER_32 = 544 -- Declared in Windows as WM_MDICREATE -- (from WEL_WM_CONSTANTS) Wm_mdidestroy: INTEGER_32 = 545 -- Declared in Windows as WM_MDIDESTROY -- (from WEL_WM_CONSTANTS) Wm_mdigetactive: INTEGER_32 = 553 -- Declared in Windows as WM_MDIGETACTIVE -- (from WEL_WM_CONSTANTS) Wm_mdiiconarrange: INTEGER_32 = 552 -- Declared in Windows as WM_MDIICONARRANGE -- (from WEL_WM_CONSTANTS) Wm_mdimaximize: INTEGER_32 = 549 -- Declared in Windows as WM_MDIMAXIMIZE -- (from WEL_WM_CONSTANTS) Wm_mdinext: INTEGER_32 = 548 -- Declared in Windows as WM_MDINEXT -- (from WEL_WM_CONSTANTS) Wm_mdirefreshmenu: INTEGER_32 = 564 -- Declared in Windows as WM_MDIREFRESHMENU -- (from WEL_WM_CONSTANTS) Wm_mdirestore: INTEGER_32 = 547 -- Declared in Windows as WM_MDIRESTORE -- (from WEL_WM_CONSTANTS) Wm_mdisetmenu: INTEGER_32 = 560 -- Declared in Windows as WM_MDISETMENU -- (from WEL_WM_CONSTANTS) Wm_mditile: INTEGER_32 = 550 -- Declared in Windows as WM_MDITILE -- (from WEL_WM_CONSTANTS) Wm_measureitem: INTEGER_32 = 44 -- Declared in Windows as WM_MEASUREITEM -- (from WEL_WM_CONSTANTS) Wm_menuchar: INTEGER_32 = 288 -- Declared in Windows as WM_MENUCHAR -- (from WEL_WM_CONSTANTS) Wm_menucommand: INTEGER_32 = 294 -- Declared in Windows as WM_MENUCOMMAND -- (from WEL_WM_CONSTANTS) Wm_menudrag: INTEGER_32 = 291 -- Declared in Windows as WM_MENUDRAG -- (from WEL_WM_CONSTANTS) Wm_menugetobject: INTEGER_32 = 292 -- Declared in Windows as WM_MENUGETOBJECT -- (from WEL_WM_CONSTANTS) Wm_menurbuttonup: INTEGER_32 = 290 -- Declared in Windows as WM_MENURBUTTONUP -- (from WEL_WM_CONSTANTS) Wm_menuselect: INTEGER_32 = 287 -- Declared in Windows as WM_MENUSELECT -- (from WEL_WM_CONSTANTS) Wm_mouseactivate: INTEGER_32 = 33 -- Declared in Windows as WM_MOUSEACTIVATE -- (from WEL_WM_CONSTANTS) Wm_mousefirst: INTEGER_32 = 512 -- Declared in Windows as WM_MOUSEFIRST -- (from WEL_WM_CONSTANTS) Wm_mousehover: INTEGER_32 = 673 -- Require Windows98, Windows NT 4.0 or later -- Declared in Windows as WM_MOUSEHOVER -- (from WEL_WM_CONSTANTS) wm_mouselast: INTEGER_32 -- Declared in Windows as WM_MOUSELAST -- (from WEL_WM_CONSTANTS) Wm_mouseleave: INTEGER_32 = 675 -- Require Windows98, Windows NT 4.0 or later -- Declared in Windows as WM_MOUSELEAVE -- (from WEL_WM_CONSTANTS) Wm_mousemove: INTEGER_32 = 512 -- Declared in Windows as WM_MOUSEMOVE -- (from WEL_WM_CONSTANTS) Wm_mousewheel: INTEGER_32 = 522 -- Declared in Windows as WM_MOUSEWHEEL -- (from WEL_WM_CONSTANTS) Wm_move: INTEGER_32 = 3 -- Declared in Windows as WM_MOVE -- (from WEL_WM_CONSTANTS) Wm_moving: INTEGER_32 = 534 -- Declared in Windows as WM_MOVING -- (from WEL_WM_CONSTANTS) Wm_ncactivate: INTEGER_32 = 134 -- Declared in Windows as WM_NCACTIVATE -- (from WEL_WM_CONSTANTS) Wm_nccalcsize: INTEGER_32 = 131 -- Declared in Windows as WM_NCCALCSIZE -- (from WEL_WM_CONSTANTS) Wm_nccreate: INTEGER_32 = 129 -- Declared in Windows as WM_NCCREATE -- (from WEL_WM_CONSTANTS) Wm_ncdestroy: INTEGER_32 = 130 -- Declared in Windows as WM_NCDESTROY -- (from WEL_WM_CONSTANTS) Wm_nchittest: INTEGER_32 = 132 -- Declared in Windows as WM_NCHITTEST -- (from WEL_WM_CONSTANTS) Wm_nclbuttondblclk: INTEGER_32 = 163 -- Declared in Windows as WM_NCLBUTTONDBLCLK -- (from WEL_WM_CONSTANTS) Wm_nclbuttondown: INTEGER_32 = 161 -- Declared in Windows as WM_NCLBUTTONDOWN -- (from WEL_WM_CONSTANTS) Wm_nclbuttonup: INTEGER_32 = 162 -- Declared in Windows as WM_NCLBUTTONUP -- (from WEL_WM_CONSTANTS) Wm_ncmbuttondblclk: INTEGER_32 = 169 -- Declared in Windows as WM_NCMBUTTONDBLCLK -- (from WEL_WM_CONSTANTS) Wm_ncmbuttondown: INTEGER_32 = 167 -- Declared in Windows as WM_NCMBUTTONDOWN -- (from WEL_WM_CONSTANTS) Wm_ncmbuttonup: INTEGER_32 = 168 -- Declared in Windows as WM_NCMBUTTONUP -- (from WEL_WM_CONSTANTS) Wm_ncmousehover: INTEGER_32 = 672 -- Require Windows98, Windows NT 5.0 or later -- Declared in Windows as WM_NCMOUSEHOVER -- (from WEL_WM_CONSTANTS) Wm_ncmouseleave: INTEGER_32 = 674 -- Require Windows98, Windows NT 5.0 or later -- Declared in Windows as WM_NCMOUSELEAVE -- (from WEL_WM_CONSTANTS) Wm_ncmousemove: INTEGER_32 = 160 -- Declared in Windows as WM_NCMOUSEMOVE -- (from WEL_WM_CONSTANTS) Wm_ncpaint: INTEGER_32 = 133 -- Declared in Windows as WM_NCPAINT -- (from WEL_WM_CONSTANTS) Wm_ncrbuttondblclk: INTEGER_32 = 166 -- Declared in Windows as WM_NCRBUTTONDBLCLK -- (from WEL_WM_CONSTANTS) Wm_ncrbuttondown: INTEGER_32 = 164 -- Declared in Windows as WM_NCRBUTTONDOWN -- (from WEL_WM_CONSTANTS) Wm_ncrbuttonup: INTEGER_32 = 165 -- Declared in Windows as WM_NCRBUTTONUP -- (from WEL_WM_CONSTANTS) Wm_ncxbuttondblclk: INTEGER_32 = 173 -- Declared in Windows as WM_NCXBUTTONDBLCLK -- (from WEL_WM_CONSTANTS) Wm_ncxbuttondown: INTEGER_32 = 171 -- Declared in Windows as WM_NCXBUTTONDOWN -- (from WEL_WM_CONSTANTS) Wm_ncxbuttonup: INTEGER_32 = 172 -- Declared in Windows as WM_NCXBUTTONUP -- (from WEL_WM_CONSTANTS) Wm_nextdlgctl: INTEGER_32 = 40 -- Declared in Windows as WM_NEXTDLGCTL -- (from WEL_WM_CONSTANTS) Wm_nextmenu: INTEGER_32 = 531 -- Declared in Windows as WM_NEXTMENU -- (from WEL_WM_CONSTANTS) Wm_notify: INTEGER_32 = 78 -- Declared in Windows as WM_NOTIFY -- (from WEL_WM_CONSTANTS) Wm_notifyformat: INTEGER_32 = 85 -- Declared in Windows as WM_NOTIFYFORMAT -- (from WEL_WM_CONSTANTS) Wm_null: INTEGER_32 = 0 -- Declared in Windows as WM_NULL -- (from WEL_WM_CONSTANTS) Wm_paint: INTEGER_32 = 15 -- Declared in Windows as WM_PAINT -- (from WEL_WM_CONSTANTS) Wm_paintclipboard: INTEGER_32 = 777 -- Declared in Windows as WM_PAINTCLIPBOARD -- (from WEL_WM_CONSTANTS) Wm_painticon: INTEGER_32 = 38 -- Declared in Windows as WM_PAINTICON -- (from WEL_WM_CONSTANTS) Wm_palettechanged: INTEGER_32 = 785 -- Declared in Windows as WM_PALETTECHANGED -- (from WEL_WM_CONSTANTS) Wm_paletteischanging: INTEGER_32 = 784 -- Declared in Windows as WM_PALETTEISCHANGING -- (from WEL_WM_CONSTANTS) Wm_parentnotify: INTEGER_32 = 528 -- Declared in Windows as WM_PARENTNOTIFY -- (from WEL_WM_CONSTANTS) Wm_paste: INTEGER_32 = 770 -- Declared in Windows as WM_PASTE -- (from WEL_WM_CONSTANTS) Wm_penwinfirst: INTEGER_32 = 896 -- Declared in Windows as WM_PENWINFIRST -- (from WEL_WM_CONSTANTS) Wm_penwinlast: INTEGER_32 = 911 -- Declared in Windows as WM_PENWINLAST -- (from WEL_WM_CONSTANTS) Wm_power: INTEGER_32 = 72 -- Declared in Windows as WM_POWER -- (from WEL_WM_CONSTANTS) Wm_powerbroadcast: INTEGER_32 = 536 -- Declared in Windows as WM_POWERBROADCAST -- (from WEL_WM_CONSTANTS) Wm_print: INTEGER_32 = 791 -- Declared in Windows as WM_PRINT -- (from WEL_WM_CONSTANTS) Wm_printclient: INTEGER_32 = 792 -- Declared in Windows as WM_PRINTCLIENT -- (from WEL_WM_CONSTANTS) Wm_querydragicon: INTEGER_32 = 55 -- Declared in Windows as WM_QUERYDRAGICON -- (from WEL_WM_CONSTANTS) Wm_queryendsession: INTEGER_32 = 17 -- Declared in Windows as WM_QUERYENDSESSION -- (from WEL_WM_CONSTANTS) Wm_querynewpalette: INTEGER_32 = 783 -- Declared in Windows as WM_QUERYNEWPALETTE -- (from WEL_WM_CONSTANTS) Wm_queryopen: INTEGER_32 = 19 -- Declared in Windows as WM_QUERYOPEN -- (from WEL_WM_CONSTANTS) Wm_queryuistate: INTEGER_32 = 297 -- Declared in Windows as WM_QUERYUISTATE -- (from WEL_WM_CONSTANTS) Wm_queuesync: INTEGER_32 = 35 -- Declared in Windows as WM_QUEUESYNC -- (from WEL_WM_CONSTANTS) Wm_quit: INTEGER_32 = 18 -- Declared in Windows as WM_QUIT -- (from WEL_WM_CONSTANTS) Wm_rbuttondblclk: INTEGER_32 = 518 -- Declared in Windows as WM_RBUTTONDBLCLK -- (from WEL_WM_CONSTANTS) Wm_rbuttondown: INTEGER_32 = 516 -- Declared in Windows as WM_RBUTTONDOWN -- (from WEL_WM_CONSTANTS) Wm_rbuttonup: INTEGER_32 = 517 -- Declared in Windows as WM_RBUTTONUP -- (from WEL_WM_CONSTANTS) Wm_renderallformats: INTEGER_32 = 774 -- Declared in Windows as WM_RENDERALLFORMATS -- (from WEL_WM_CONSTANTS) Wm_renderformat: INTEGER_32 = 773 -- Declared in Windows as WM_RENDERFORMAT -- (from WEL_WM_CONSTANTS) Wm_set_window_pos_msg: INTEGER_32 = 1025 -- Our own messaging -- (from WEL_RESIZING_SUPPORT) Wm_setcursor: INTEGER_32 = 32 -- Declared in Windows as WM_SETCURSOR -- (from WEL_WM_CONSTANTS) Wm_setfocus: INTEGER_32 = 7 -- Declared in Windows as WM_SETFOCUS -- (from WEL_WM_CONSTANTS) Wm_setfont: INTEGER_32 = 48 -- Declared in Windows as WM_SETFONT -- (from WEL_WM_CONSTANTS) Wm_sethotkey: INTEGER_32 = 50 -- Declared in Windows as WM_SETHOTKEY -- (from WEL_WM_CONSTANTS) Wm_seticon: INTEGER_32 = 128 -- Declared in Windows as WM_SETICON -- (from WEL_WM_CONSTANTS) Wm_setredraw: INTEGER_32 = 11 -- Declared in Windows as WM_SETREDRAW -- (from WEL_WM_CONSTANTS) Wm_settext: INTEGER_32 = 12 -- Declared in Windows as WM_SETTEXT -- (from WEL_WM_CONSTANTS) Wm_settingchange: INTEGER_32 = 26 -- Declared in Windows as WM_WININICHANGE -- Was declared in {WEL_WM_CONSTANTS} as synonym of `wm_wininichange`. -- (from WEL_WM_CONSTANTS) Wm_showwindow: INTEGER_32 = 24 -- Declared in Windows as WM_SHOWWINDOW -- (from WEL_WM_CONSTANTS) Wm_size: INTEGER_32 = 5 -- Declared in Windows as WM_SIZE -- (from WEL_WM_CONSTANTS) Wm_sizeclipboard: INTEGER_32 = 779 -- Declared in Windows as WM_SIZECLIPBOARD -- (from WEL_WM_CONSTANTS) Wm_sizing: INTEGER_32 = 532 -- Declared in Windows as WM_SIZING -- (from WEL_WM_CONSTANTS) Wm_spoolerstatus: INTEGER_32 = 42 -- Declared in Windows as WM_SPOOLERSTATUS -- (from WEL_WM_CONSTANTS) Wm_stylechanged: INTEGER_32 = 125 -- Declared in Windows as WM_STYLECHANGED -- (from WEL_WM_CONSTANTS) Wm_stylechanging: INTEGER_32 = 124 -- Declared in Windows as WM_STYLECHANGING -- (from WEL_WM_CONSTANTS) Wm_syncpaint: INTEGER_32 = 136 -- Declared in Windows as WM_SYNCPAINT -- (from WEL_WM_CONSTANTS) Wm_syschar: INTEGER_32 = 262 -- Declared in Windows as WM_SYSCHAR -- (from WEL_WM_CONSTANTS) Wm_syscolorchange: INTEGER_32 = 21 -- Declared in Windows as WM_SYSCOLORCHANGE -- (from WEL_WM_CONSTANTS) Wm_syscommand: INTEGER_32 = 274 -- Declared in Windows as WM_SYSCOMMAND -- (from WEL_WM_CONSTANTS) Wm_sysdeadchar: INTEGER_32 = 263 -- Declared in Windows as WM_SYSDEADCHAR -- (from WEL_WM_CONSTANTS) Wm_syskeydown: INTEGER_32 = 260 -- Declared in Windows as WM_SYSKEYDOWN -- (from WEL_WM_CONSTANTS) Wm_syskeyup: INTEGER_32 = 261 -- Declared in Windows as WM_SYSKEYUP -- (from WEL_WM_CONSTANTS) Wm_tcard: INTEGER_32 = 82 -- Declared in Windows as WM_TCARD -- (from WEL_WM_CONSTANTS) Wm_themechanged: INTEGER_32 = 794 -- Declared in Windows as WM_THEMECHANGED -- (from WEL_WM_CONSTANTS) Wm_timechange: INTEGER_32 = 30 -- Declared in Windows as WM_TIMECHANGE -- (from WEL_WM_CONSTANTS) Wm_timer: INTEGER_32 = 275 -- Declared in Windows as WM_TIMER -- (from WEL_WM_CONSTANTS) Wm_undo: INTEGER_32 = 772 -- Declared in Windows as WM_UNDO -- (from WEL_WM_CONSTANTS) Wm_uninitmenupopup: INTEGER_32 = 293 -- Declared in Windows as WM_UNINITMENUPOPUP -- (from WEL_WM_CONSTANTS) Wm_updateuistate: INTEGER_32 = 296 -- Declared in Windows as WM_UPDATEUISTATE -- (from WEL_WM_CONSTANTS) Wm_user: INTEGER_32 = 1024 -- Declared in Windows as WM_USER -- (from WEL_WM_CONSTANTS) Wm_userchanged: INTEGER_32 = 84 -- Declared in Windows as WM_USERCHANGED -- (from WEL_WM_CONSTANTS) Wm_vkeytoitem: INTEGER_32 = 46 -- Declared in Windows as WM_VKEYTOITEM -- (from WEL_WM_CONSTANTS) Wm_vscroll: INTEGER_32 = 277 -- Declared in Windows as WM_VSCROLL -- (from WEL_WM_CONSTANTS) Wm_vscrollclipboard: INTEGER_32 = 778 -- Declared in Windows as WM_VSCROLLCLIPBOARD -- (from WEL_WM_CONSTANTS) Wm_windowposchanged: INTEGER_32 = 71 -- Declared in Windows as WM_WINDOWPOSCHANGED -- (from WEL_WM_CONSTANTS) Wm_windowposchanging: INTEGER_32 = 70 -- Declared in Windows as WM_WINDOWPOSCHANGING -- (from WEL_WM_CONSTANTS) Wm_wininichange: INTEGER_32 = 26 -- Declared in Windows as WM_WININICHANGE -- Was declared in {WEL_WM_CONSTANTS} as synonym of `wm_settingchange`. -- (from WEL_WM_CONSTANTS) Wm_xbuttondblclk: INTEGER_32 = 525 -- Declared in Windows as WM_XBUTTONDBLCLK -- (from WEL_WM_CONSTANTS) Wm_xbuttondown: INTEGER_32 = 523 -- Declared in Windows as WM_XBUTTONDOWN -- (from WEL_WM_CONSTANTS) Wm_xbuttonup: INTEGER_32 = 524 -- Declared in Windows as WM_XBUTTONUP -- (from WEL_WM_CONSTANTS) feature -- Access -- A toolbar can have a combination of the following styles. Tbstyle_altdrag: INTEGER_32 = 1024 -- Allows the user to change the position of a toolbar -- button by dragging it while holding down the ALT key. -- If this style is not specified, the user must hold -- down the SHIFT key while dragging a button. Note -- that the Ccs_adjustable style must be specified to -- enable toolbar buttons to be dragged. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_autosize: INTEGER_32 = 16 -- The toolbar will not assign the standard width to -- the button. Instead, the buttons width will be calculated -- based on the width of the text plus the image of the -- button. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_button: INTEGER_32 = 0 -- Creates a standard push button. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_check: INTEGER_32 = 2 -- Creates a button that toggles between the pressed -- and not pressed states each time the user clicks it. -- The button has a different background color when it -- is in the pressed state. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_checkgroup: INTEGER_32 = 6 -- Creates a check button that stays pressed until -- another button in the group is pressed. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_customerase: INTEGER_32 = 8192 -- Generates NM_CUSTOMDRAW notification messages when -- it processes WM_ERASEBKGND. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_dropdown: INTEGER_32 = 8 -- Creates a drop-down list button. If the toolbar has -- the TBSTYLE_EX_DRAWDDARROWS extended style, an arrow -- will be displayed next to the button. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_flat: INTEGER_32 = 2048 -- Creates a transparent toolbar with flat buttons. -- The apparence of the button change when the user -- move the mouse on the button. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_group: INTEGER_32 = 4 -- Creates a button that stays pressed until another -- button in the group is pressed. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_list: INTEGER_32 = 4096 -- Places button text to the right of button bitmaps. -- To avoid repainting problems, this style should be -- set before the toolbar control becomes visible. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_sep: INTEGER_32 = 1 -- Creates a separator, providing a small gap between -- button groups. A button that has this style does not -- receive user input. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_tooltips: INTEGER_32 = 256 -- Creates a tooltip control that an application can -- use to display descriptive text for the buttons in -- the toolbar. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_transparent: INTEGER_32 = 32768 -- Version 4.71. Creates a transparent toolbar. In a transparent toolbar, -- the toolbar is transparent but the buttons are not. Button text appears -- under button bitmaps. To prevent repainting problems, this style should -- be set before the toolbar control becomes visible. -- A button in a toolbar can have a combination of the following styles. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_wrapable: INTEGER_32 = 512 -- Creates a toolbar that can have multiple lines of -- buttons. Toolbar buttons can "wrap" to the next -- line when the toolbar becomes too narrow to include -- all buttons on the same line. Wrapping occurs on -- separation and non-group boundaries. -- (from WEL_TB_STYLE_CONSTANTS) feature -- Comparison frozen deep_equal (a: detachable ANY; b: like arg #1): BOOLEAN -- Are a and b either both void -- or attached to isomorphic object structures? -- (from ANY) ensure -- from ANY instance_free: class shallow_implies_deep: standard_equal (a, b) implies Result both_or_none_void: (a = Void) implies (Result = (b = Void)) same_type: (Result and (a /= Void)) implies (b /= Void and then a.same_type (b)) symmetric: Result implies deep_equal (b, a) frozen equal (a: detachable ANY; b: like arg #1): BOOLEAN -- Are a and b either both void or attached -- to objects considered equal? -- (from ANY) ensure -- from ANY instance_free: class definition: Result = (a = Void and b = Void) or else ((a /= Void and b /= Void) and then a.is_equal (b)) frozen is_deep_equal alias "≡≡≡" (other: WEL_IMAGELIST_TOOL_BAR): BOOLEAN -- Are Current and other attached to isomorphic object structures? -- (from ANY) require -- from ANY other_not_void: other /= Void ensure -- from ANY shallow_implies_deep: standard_is_equal (other) implies Result same_type: Result implies same_type (other) symmetric: Result implies other.is_deep_equal (Current) is_equal (other: WEL_IMAGELIST_TOOL_BAR): BOOLEAN -- Is other attached to an object considered -- equal to current object? -- (from ANY) require -- from ANY other_not_void: other /= Void ensure -- from ANY symmetric: Result implies other ~ Current consistent: standard_is_equal (other) implies Result frozen standard_equal (a: detachable ANY; b: like arg #1): BOOLEAN -- Are a and b either both void or attached to -- field-by-field identical objects of the same type? -- Always uses default object comparison criterion. -- (from ANY) ensure -- from ANY instance_free: class definition: Result = (a = Void and b = Void) or else ((a /= Void and b /= Void) and then a.standard_is_equal (b)) frozen standard_is_equal alias "≜" (other: WEL_IMAGELIST_TOOL_BAR): BOOLEAN -- Is other attached to an object of the same type -- as current object, and field-by-field identical to it? -- (from ANY) require -- from ANY other_not_void: other /= Void ensure -- from ANY same_type: Result implies same_type (other) symmetric: Result implies other.standard_is_equal (Current) feature -- Status report absolute_x: INTEGER_32 -- Absolute x position -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW Result = window_rect.x absolute_y: INTEGER_32 -- Absolute y position -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW Result = window_rect.y background_brush: detachable WEL_BRUSH -- Current window background color used to refresh the window when -- requested by the WM_ERASEBKGND windows message. -- By default there is no background -- (from WEL_WINDOW) ensure -- from WEL_WINDOW new_object: Result /= Void implies Result /= background_brush background_brush_gdip: detachable WEL_GDIP_BRUSH -- GDI+ version of `background_brush` -- Result void if GDI+ not available -- (from WEL_WINDOW) button_checked (command_id: INTEGER_32): BOOLEAN -- Is the button identified by command_id checked? -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists button_count: INTEGER_32 -- Number of buttons in toolbar -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists ensure -- from WEL_TOOL_BAR positive_result: Result >= 0 button_enabled (command_id: INTEGER_32): BOOLEAN -- Is the button identified by command_id enabled? -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists button_hidden (command_id: INTEGER_32): BOOLEAN -- Is the button identified by command_id hidden? -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists button_indeterminate (command_id: INTEGER_32): BOOLEAN -- Is the button identified by command_id -- indeterminate? -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists button_pressed (command_id: INTEGER_32): BOOLEAN -- Is the button identified by command_id pressed? -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists button_rect (index: INTEGER_32): WEL_RECT -- Rectangle of button at the zero-based index. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists index_large_enough: index >= 0 index_small_enough: index < button_count ensure -- from WEL_TOOL_BAR result_not_void: Result /= Void caption_height: INTEGER_32 -- Height of normal caption area -- (from WEL_SYSTEM_METRICS) captured_window: detachable WEL_WINDOW -- Current window which has been captured. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists window_captured: window_captured client_rect: WEL_RECT -- Client rectangle -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW result_not_void: Result /= Void command (message: INTEGER_32): WEL_COMMAND -- Command associated to message -- (from WEL_WINDOW) require -- from WEL_WINDOW positive_message: message >= 0 command_exists: command_exists (message) ensure -- from WEL_WINDOW result_not_void: Result /= Void command_argument (message: INTEGER_32): detachable ANY -- Command argument associated to message -- (from WEL_WINDOW) require -- from WEL_WINDOW positive_message: message >= 0 command_exists: command_exists (message) command_exists (message: INTEGER_32): BOOLEAN -- Does a command associated to message exist? -- (from WEL_WINDOW) require -- from WEL_WINDOW positive_message: message >= 0 ensure -- from WEL_WINDOW definition: Result implies attached commands as l_commands_var and then l_commands_var.item (message) /= Void commands_enabled: BOOLEAN -- Is the commands execution enabled? -- (from WEL_WINDOW) conforms_to (other: ANY): BOOLEAN -- Does type of current object conform to type -- of other (as per Eiffel: The Language, chapter 13)? -- (from ANY) require -- from ANY other_not_void: other /= Void cursor_height: INTEGER_32 -- Height of the cursor -- (from WEL_SYSTEM_METRICS) cursor_width: INTEGER_32 -- Width of the cursor -- (from WEL_SYSTEM_METRICS) dbcs_installed: BOOLEAN -- Is the double-byte character set (DBCS) version -- of USER.EXE installed? -- (from WEL_SYSTEM_METRICS) debug_installed: BOOLEAN -- Is the debugging version of USER.EXE installed? -- (from WEL_SYSTEM_METRICS) dialog_window_frame_height: INTEGER_32 -- Height of window frame for window that -- has the `ws_dlgframe` style -- (from WEL_SYSTEM_METRICS) dialog_window_frame_width: INTEGER_32 -- Width of window frame for window that -- has the `ws_dlgframe` style -- (from WEL_SYSTEM_METRICS) double_click_height: INTEGER_32 -- Height of a rectangle around the location of a -- first click in a double-click sequence. The second -- click must occur within this rectangle for the -- system to consider the two clicks a double-click. -- (from WEL_SYSTEM_METRICS) double_click_width: INTEGER_32 -- Width of a rectangle around the location of a -- first click in a double-click sequence. The second -- click must occur within this rectangle for the -- system to consider the two clicks a double-click. -- (from WEL_SYSTEM_METRICS) enabled: BOOLEAN -- Is the window enabled for mouse and keyboard input? -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ex_style: INTEGER_32 -- Window ex_style -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists exists: BOOLEAN -- Does the `item` exist? -- (from WEL_ANY) ensure -- from WEL_ANY Result = (item /= default_pointer) find_button (a_x, a_y: INTEGER_32): INTEGER_32 -- Determines where a point lies in a toolbar control. -- -- Returns an integer value. If the return value is zero or a positive value, -- it is the zero-based index of the nonseparator item in which the point lies. -- If the return value is negative, the point does not lie within a button. -- The absolute value of the return value is the index of a separator item -- or the nearest nonseparator item. require exists: exists flag_set (flags, mask: INTEGER_32): BOOLEAN -- Is mask set in flags? -- (from WEL_BIT_OPERATIONS) focused_window: detachable WEL_WINDOW -- Current window which has the focus. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists foreground_window: detachable WEL_WINDOW -- Foreground window (window with focus) -- (from WEL_WINDOWS_ROUTINES) full_screen_client_area_height: INTEGER_32 -- Height of the client area for a full-screen window -- (from WEL_SYSTEM_METRICS) full_screen_client_area_width: INTEGER_32 -- Width of the client area for a full-screen window -- (from WEL_SYSTEM_METRICS) get_max_height: INTEGER_32 -- Retrieves the common height of all of the visible buttons and separators in the toolbar. require exists: exists get_max_size: WEL_SIZE -- Retrieves the total size of all of the visible buttons and separators in the toolbar require exists: exists get_max_width: INTEGER_32 -- Retrieves the total width of all of the visible buttons and separators in the toolbar. require exists: exists has_bitmap: BOOLEAN -- Does the toolbar contains one bitmap or more? -- (from WEL_TOOL_BAR) has_capture: BOOLEAN -- Does this window have the capture? -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists has_focus: BOOLEAN -- Does this window have the focus? -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists has_horizontal_scroll_bar: BOOLEAN -- Does this window have a horizontal scroll bar? -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists has_system_font: BOOLEAN -- Does the control use the system font? -- (from WEL_CONTROL) require -- from WEL_CONTROL exists: exists has_vertical_scroll_bar: BOOLEAN -- Does this window have a vertical scroll bar? -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists height: INTEGER_32 -- Window height -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists horizontal_scroll_bar_arrow_height: INTEGER_32 -- Height of arrow bitmap on horizontal scrollbar -- (from WEL_SYSTEM_METRICS) horizontal_scroll_bar_arrow_width: INTEGER_32 -- Width of arrow bitmap on horizontal scrollbar -- (from WEL_SYSTEM_METRICS) horizontal_scroll_bar_thumb_width: INTEGER_32 -- (from WEL_SYSTEM_METRICS) i_th_button (index: INTEGER_32): WEL_TOOL_BAR_BUTTON -- Button at the zero-based index. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists index_large_enough: index >= 0 index_small_enough: index < button_count ensure -- from WEL_TOOL_BAR result_not_void: Result /= Void icon_height: INTEGER_32 -- Height of an icon -- (from WEL_SYSTEM_METRICS) icon_spacing_height: INTEGER_32 -- Height of rectangular cell that Program Manager -- uses to position tiled icons -- (from WEL_SYSTEM_METRICS) icon_spacing_width: INTEGER_32 -- Width of rectangular cell that Program Manager -- uses to position tiled icons -- (from WEL_SYSTEM_METRICS) icon_width: INTEGER_32 -- Width of an icon -- (from WEL_SYSTEM_METRICS) imm_enabled: BOOLEAN -- Is the IMM enabled (works only for Windows 2000 and -- and Asian locale machines (Chinese, Japanese, Korean)) -- (from WEL_SYSTEM_METRICS) is_inside: BOOLEAN -- Is the current window inside another window? -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists is_remote_session: BOOLEAN -- Is current applications displayed using remote desktop? -- (from WEL_SYSTEM_METRICS) is_terminal_service: BOOLEAN -- If window in terminal service (Remote Desktop)? -- (from WEL_WINDOWS_ROUTINES) require -- from WEL_WINDOWS_ROUTINES after_2000: (create {WEL_WINDOWS_VERSION} end).is_windows_2000_compatible is_window (hwnd: POINTER): BOOLEAN -- Does hwnd point to a valid Window? -- (from WEL_WINDOWS_ROUTINES) kanji_window_height: INTEGER_32 -- Height of the Kanji window at the bottom of the -- screen. For double-byte character set versions of -- Windows only. -- (from WEL_SYSTEM_METRICS) key_down (virtual_key: INTEGER_32): BOOLEAN --Is 'virtual' key pressed -- (from WEL_WINDOWS_ROUTINES) key_locked (virtual_key: INTEGER_32): BOOLEAN --Is 'virtual' key locked -- (from WEL_WINDOWS_ROUTINES) key_to_string (key_data: INTEGER_32): STRING_32 -- Give the string associated with the key given by -- virtual_key. -- (from WEL_WINDOWS_ROUTINES) last_bitmap_index: INTEGER_32 -- Last bitmap index added by `add_bitmaps`. -- (from WEL_TOOL_BAR) last_string_index: INTEGER_32 -- Last string index added by `add_strings`. -- (from WEL_TOOL_BAR) maximal_height: INTEGER_32 -- Maximal height allowed for the window -- (from WEL_WINDOW) ensure -- from WEL_WINDOW result_large_enough: Result >= minimal_height maximal_width: INTEGER_32 -- Maximal width allowed for the window -- (from WEL_WINDOW) ensure -- from WEL_WINDOW result_large_enough: Result >= minimal_width maximized: BOOLEAN -- Is the window maximized? -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists maximized_window_height: INTEGER_32 -- Height of a maximized window -- (from WEL_SYSTEM_METRICS) maximized_window_width: INTEGER_32 -- Width of a maximized window -- (from WEL_SYSTEM_METRICS) menu_bar_height: INTEGER_32 -- Height of single-line menu bar -- (from WEL_SYSTEM_METRICS) minimal_height: INTEGER_32 -- Minimal height allowed for the window -- Zero by default. -- (from WEL_WINDOW) ensure -- from WEL_WINDOW positive_result: Result >= 0 result_small_enough: Result <= maximal_height minimal_width: INTEGER_32 -- Minimal width allowed for the window -- Zero by default. -- (from WEL_WINDOW) ensure -- from WEL_WINDOW positive_result: Result >= 0 result_small_enough: Result <= maximal_width minimized: BOOLEAN -- Is the window minimized? -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists monitor_count: INTEGER_32 -- Number of monitors used for displaying virtual screen. -- (from WEL_SYSTEM_METRICS) mouse_button_swapped: BOOLEAN -- Are the meanings of the left and right mouse -- buttons swapped? -- (from WEL_SYSTEM_METRICS) mouse_installed: BOOLEAN -- Is a mouse installed? -- (from WEL_SYSTEM_METRICS) pen_installed: BOOLEAN -- Is a pen installed? -- (from WEL_SYSTEM_METRICS) placement: WEL_WINDOW_PLACEMENT -- Window placement information -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW result_not_void: Result /= Void popup_menu_right_aligned: BOOLEAN -- Are pop-up menus right-aligned relative to the -- corresponding menu-bar item? -- (from WEL_SYSTEM_METRICS) same_type (other: ANY): BOOLEAN -- Is type of current object identical to type of other? -- (from ANY) require -- from ANY other_not_void: other /= Void ensure -- from ANY definition: Result = (conforms_to (other) and other.conforms_to (Current)) screen_height: INTEGER_32 -- Screen height -- (from WEL_SYSTEM_METRICS) screen_width: INTEGER_32 -- Screen width -- (from WEL_SYSTEM_METRICS) shared: BOOLEAN -- Is `item` shared by another object? -- If False (by default), `item` will -- be destroyed by `destroy_item`. -- If True, `item` will not be destroyed. -- (from WEL_ANY) shown: BOOLEAN -- Is the window shown? -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists style: INTEGER_32 -- Window style -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists system_directory: STRING_32 -- Path of the Windows system directory -- (from WEL_WINDOWS_ROUTINES) ensure -- from WEL_WINDOWS_ROUTINES result_not_void: Result /= Void tick_count: INTEGER_32 -- Number of milliseconds that have -- elapsed since Windows was started. -- (from WEL_WINDOWS_ROUTINES) ensure -- from WEL_WINDOWS_ROUTINES positive_result: Result >= 0 title_bar_height: INTEGER_32 -- Height of title bar. -- (from WEL_SYSTEM_METRICS) title_bar_image_height: INTEGER_32 -- Height of bitmap contained in title bar. -- (from WEL_SYSTEM_METRICS) title_bar_image_width: INTEGER_32 -- Width of bitmap contained in title bar. -- (from WEL_SYSTEM_METRICS) tooltip: detachable WEL_TOOLTIP -- The tooltip associated with the toolbar -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR tooltip_exists: tooltip_exists tooltip_exists: BOOLEAN -- Is there a tooltip associated to the toolbar? -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists valid_hwnd_constant (c: POINTER): BOOLEAN -- Is c a valid hwnd constant? -- (from WEL_HWND_CONSTANTS) vertical_scroll_bar_arrow_height: INTEGER_32 -- Height of arrow bitmap on vertical scrollbar -- (from WEL_SYSTEM_METRICS) vertical_scroll_bar_arrow_width: INTEGER_32 -- Width of arrow bitmap on vertical scrollbar -- (from WEL_SYSTEM_METRICS) vertical_scroll_bar_thumb_height: INTEGER_32 -- Height of vertical scrollbar thumb -- (from WEL_SYSTEM_METRICS) virtual_screen_height: INTEGER_32 -- Screen height -- (from WEL_SYSTEM_METRICS) virtual_screen_width: INTEGER_32 -- Screen width -- (from WEL_SYSTEM_METRICS) virtual_screen_x: INTEGER_32 -- Screen width -- (from WEL_SYSTEM_METRICS) virtual_screen_y: INTEGER_32 -- Screen height -- (from WEL_SYSTEM_METRICS) width: INTEGER_32 -- Window width -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists window_border_height: INTEGER_32 -- Height of the border of a window -- (from WEL_SYSTEM_METRICS) window_border_width: INTEGER_32 -- Width of the border of a window -- (from WEL_SYSTEM_METRICS) window_captured: BOOLEAN -- Has a window been captured? -- (from WEL_WINDOW) window_frame_height: INTEGER_32 -- Height of window frame for a window -- that can be resized -- (from WEL_SYSTEM_METRICS) window_frame_width: INTEGER_32 -- Width of window frame for a window -- that can be resized -- (from WEL_SYSTEM_METRICS) window_minimum_height: INTEGER_32 -- Minimum height of a window -- (from WEL_SYSTEM_METRICS) window_minimum_width: INTEGER_32 -- Minimum width of a window -- (from WEL_SYSTEM_METRICS) window_of_item (hwnd: POINTER): detachable WEL_WINDOW -- Retrieve Eiffel object associated with hwnd pointer. -- (from WEL_WINDOWS_ROUTINES) require -- from WEL_WINDOWS_ROUTINES hwnd_not_null: hwnd /= default_pointer is_window_pointer: is_window (hwnd) ensure -- from WEL_WINDOWS_ROUTINES is_wel_window: Result /= Void end implies (create {INTERNAL} end).type_conforms_to ((create {INTERNAL} end).dynamic_type (Result), (create {INTERNAL} end).dynamic_type_from_string ("WEL_WINDOW")) is_proper_wel_window: Result /= Void implies Result.item = hwnd window_rect: WEL_RECT -- Window rectangle (absolute position) -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW result_not_void: Result /= Void windows_directory: STRING_32 -- Path of the Windows directory -- (from WEL_WINDOWS_ROUTINES) ensure -- from WEL_WINDOWS_ROUTINES result_not_void: Result /= Void x: INTEGER_32 -- Window x position -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW parent = Void implies Result = absolute_x y: INTEGER_32 -- Window y position -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW parent = Void implies Result = absolute_y feature -- Status setting check_button (command_id: INTEGER_32) -- Checks a button identified by command_id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists ensure -- from WEL_TOOL_BAR button_is_checked: button_checked (command_id) clear_indeterminate_state (command_id: INTEGER_32) -- Clear the indeterminate state of the button -- identified by command_id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists ensure -- from WEL_TOOL_BAR button_not_indeterminate: not button_indeterminate (command_id) disable -- Disable mouse and keyboard input -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW disabled: not enabled disable_button (command_id: INTEGER_32) -- Disable the button identified by command_id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists ensure -- from WEL_TOOL_BAR button_disabled: not button_enabled (command_id) disable_commands -- Disable commands execution. -- (from WEL_WINDOW) ensure -- from WEL_WINDOW commands_disabled: not commands_enabled disable_default_processing -- Disable default window processing. -- The standard window procedure will not be called for -- each messages received by the window and then the -- normal behavior will not occur. -- (from WEL_WINDOW) ensure -- from WEL_WINDOW default_processing_disabled: not default_processing disable_drag_accept_files -- Disallow Current from being a file drag and drop target. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists disable_hot_item -- Unset the hot item. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists enable -- Enable mouse and keyboard input. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW enabled: enabled enable_button (command_id: INTEGER_32) -- Enable the button identified by command_id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists ensure -- from WEL_TOOL_BAR button_enabled: button_enabled (command_id) enable_commands -- Enable commands execution. -- (from WEL_WINDOW) ensure -- from WEL_WINDOW commands_enabled: commands_enabled enable_default_processing -- Enable default window processing. -- The standard window procedure will be called for -- each messages received by the window and then the -- normal behavior will occur. -- (from WEL_WINDOW) ensure -- from WEL_WINDOW default_processing_enabled: default_processing enable_drag_accept_files -- Allow Current to be a file drag and drop target. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists enable_hot_item (command_id: INTEGER_32) -- Set hot item for button identified by command_id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists hide -- Hide the window -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW hidden: not shown hide_button (command_id: INTEGER_32) -- Hide the button identified by command_id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists ensure -- from WEL_TOOL_BAR button_hidden: button_hidden (command_id) maximize -- Maximize the window -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW maximized: maximized minimize -- Minimize the window and display its icon -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW minimized: minimized press_button (command_id: INTEGER_32) -- Press the button identified by command_id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists ensure -- from WEL_TOOL_BAR button_pressed: button_pressed (command_id) release_button (command_id: INTEGER_32) -- Release the button identified by command_id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists ensure -- from WEL_TOOL_BAR button_not_pressed: not button_pressed (command_id) release_capture -- Release the mouse capture after a call -- to `set_capture`. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists has_capture: has_capture ensure -- from WEL_WINDOW not_has_capture: not has_capture restore -- Restore the window to its -- original size and position after -- `minimize` or `maximize` -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists set_bitmap_size (a_width, a_height: INTEGER_32) -- Sets the size of the bitmapped images to be added to -- the toolbar. -- The size can be set only before adding any -- bitmaps to the toolbar. If an application does -- not explicitly set the bitmap size, the size -- defaults to 16 by 15 pixels. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists positive_width: a_width >= 0 positive_height: a_height >= 0 no_bitmap_present: not has_bitmap set_button_size (a_width, a_height: INTEGER_32) -- Set the size of the buttons to be added to the -- toolbar. -- The size can be set only before adding any buttons -- to the toolbar. If an application does not -- explicitly set the button size, the size defaults -- to 24 by 22 pixels. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists positive_width: a_width >= 0 positive_height: a_height >= 0 no_existing_buttons: button_count = 0 set_capture -- Set the mouse capture to the Current window. -- Once the window has captured the mouse, all -- mouse input is directed to this window, regardless -- of whether the cursor is over that window. Only -- one window can have the mouse capture at a time. -- -- Works only for windows in the same thread as your -- application. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists has_not_capture: not has_capture set_ex_style (an_ex_style: INTEGER_32) -- Set an_ex_style with `ex_style`. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists set_focus -- Set the focus to Current -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists set_identifier (index, an_id: INTEGER_32) -- Set the identifier for the button at zero-based -- index to an_id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists index_large_enough: index >= 0 index_small_enough: index < button_count set_indeterminate_state (command_id: INTEGER_32) -- Set the indeterminate state of the button -- identified by command_id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists ensure -- from WEL_TOOL_BAR button_indeterminate: button_indeterminate (command_id) set_rows (a_row_count: INTEGER_32) -- Try to set items in toolbar to show in a_row_count -- rows. The actual result maybe different base on buttons' -- pixmaps' widths and buttons texts' widths. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists valid: a_row_count > 0 set_shared -- Set `shared` to True. -- (from WEL_ANY) ensure -- from WEL_ANY shared: shared set_style (a_style: INTEGER_32) -- Set `style` with a_style. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists set_tooltip (a_tooltip: WEL_TOOLTIP) -- Associate a tooltip control with the toolbar. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists a_tooltip_not_void: a_tooltip /= Void a_tooltip_exists: a_tooltip.exists ensure -- from WEL_TOOL_BAR tooltip_exists: tooltip_exists tooltip_set: tooltip = a_tooltip set_unshared -- Set `shared` to False. -- (from WEL_ANY) ensure -- from WEL_ANY unshared: not shared show -- Show the window -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists show_button (command_id: INTEGER_32) -- Show the button identified by command_id. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists ensure -- from WEL_TOOL_BAR button_shown: not button_hidden (command_id) uncheck_button (command_id: INTEGER_32) -- Unchecks a button identified by command_id -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists ensure -- from WEL_TOOL_BAR button_unchecked: not button_checked (command_id) update_cached_style (new_ex_style, old_ex_style: INTEGER_32) -- Update Window cache buffer for Window style. -- (from WEL_WINDOW) feature -- Element change add_bitmaps (tb_bitmap: WEL_TOOL_BAR_BITMAP; bitmap_count: INTEGER_32) -- Add bitmaps. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists bitmap_not_void: tb_bitmap /= Void bitmap_exists: tb_bitmap.exists positive_bitmap_count: bitmap_count > 0 add_buttons (buttons: ARRAY [WEL_TOOL_BAR_BUTTON]) -- Add buttons. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists buttons_not_void: buttons /= Void buttons_not_empty: not buttons.is_empty ensure -- from WEL_TOOL_BAR count_increased: button_count = old button_count + buttons.count add_strings (strings: ARRAY [READABLE_STRING_GENERAL]) -- Add strings to the toolbar. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists string_not_void: strings /= Void strings_not_empty: not strings.is_empty disable_redraw -- Disable redrawing of Current until next call to `enable_redraw`. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists enable_redraw -- Ensure Current is redrawn as required. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists get_image_list: WEL_IMAGE_LIST require exists: exists has_system_window_locked: BOOLEAN -- Is there any window locked ? -- (from WEL_WINDOW) insert_button (index: INTEGER_32; button: WEL_TOOL_BAR_BUTTON) -- Insert button to the left of the button -- at the zero-based index. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists button_not_void: button /= Void button_exists: button.exists index_large_enough: index >= 0 index_small_enough: index <= button_count ensure -- from WEL_TOOL_BAR buttons_increased: button_count = old button_count + 1 lock_window_update -- Disables drawing in the current window. A locked window cannot be moved. -- Only one window can be locked at a time. To unlock a window locked with -- `lock_window_update` , call 'unlock_window_update'. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW has_system_window_locked set_font (a_font: WEL_FONT) -- Set `font` with a_font. -- (from WEL_CONTROL) require -- from WEL_CONTROL exists: exists a_font_not_void: a_font /= Void a_font_exists: a_font.exists ensure -- from WEL_CONTROL font_set: not has_system_font implies font.item = a_font.item set_height (a_height: INTEGER_32) -- Set `height` with a_height -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists set_hot_image_list (an_image_list: detachable WEL_IMAGE_LIST) -- Set the hot imageList to an_image_list. -- -- To remove the imagelist, set an_image_list to Void. require exists: exists set_image_list (an_image_list: detachable WEL_IMAGE_LIST) -- Set the default imageList to an_image_list. -- -- To remove the imagelist, set an_image_list to Void. require exists: exists set_item (an_item: POINTER) -- Set `item` with an_item -- (from WEL_ANY) ensure -- from WEL_ANY item_set: item = an_item set_parent (a_parent: detachable WEL_WINDOW) -- Change the parent of the current window. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists set_placement (a_placement: WEL_WINDOW_PLACEMENT) -- Set `placement` with a_placement -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists a_placement_not_void: a_placement /= Void a_placement_exists: a_placement.exists set_timer (timer_id, time_out: INTEGER_32) -- Set a timer identified by timer_id with a -- time_out value (in milliseconds). -- See also `on_timer`, `kill_timer`. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists positive_timer_id: timer_id > 0 positive_time_out: time_out > 0 set_width (a_width: INTEGER_32) -- Set `width` with a_width -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists set_x (a_x: INTEGER_32) -- Set `x` with a_x -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists set_y (a_y: INTEGER_32) -- Set `y` with a_y -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists unlock_window_update -- Unlock a locked window. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists feature -- Removal delete_button (index: INTEGER_32) -- Delete the button at the zero-based index. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists index_large_enough: index >= 0 index_small_enough: index < button_count ensure -- from WEL_TOOL_BAR buttons_decreased: button_count = old button_count - 1 destroy -- Destroy the window. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW not_exists: not exists dispose -- Free allocated memory. -- (from WEL_WINDOW) require -- from DISPOSABLE True feature -- Resizing get_button_height: INTEGER_32 -- Get the height of the buttons. require exists: exists get_button_width: INTEGER_32 -- Get the width of the buttons. require exists: exists feature -- Duplication copy (other: WEL_IMAGELIST_TOOL_BAR) -- Update current object using fields of object attached -- to other, so as to yield equal objects. -- (from ANY) require -- from ANY other_not_void: other /= Void type_identity: same_type (other) ensure -- from ANY is_equal: Current ~ other frozen deep_copy (other: WEL_IMAGELIST_TOOL_BAR) -- Effect equivalent to that of: -- `copy` (other . `deep_twin`) -- (from ANY) require -- from ANY other_not_void: other /= Void ensure -- from ANY deep_equal: deep_equal (Current, other) frozen deep_twin: WEL_IMAGELIST_TOOL_BAR -- New object structure recursively duplicated from Current. -- (from ANY) ensure -- from ANY deep_twin_not_void: Result /= Void deep_equal: deep_equal (Current, Result) frozen standard_copy (other: WEL_IMAGELIST_TOOL_BAR) -- Copy every field of other onto corresponding field -- of current object. -- (from ANY) require -- from ANY other_not_void: other /= Void type_identity: same_type (other) ensure -- from ANY is_standard_equal: standard_is_equal (other) frozen standard_twin: WEL_IMAGELIST_TOOL_BAR -- New object field-by-field identical to other. -- Always uses default copying semantics. -- (from ANY) ensure -- from ANY standard_twin_not_void: Result /= Void equal: standard_equal (Result, Current) frozen twin: WEL_IMAGELIST_TOOL_BAR -- New object equal to Current -- `twin` calls `copy`; to change copying/twinning semantics, redefine `copy`. -- (from ANY) ensure -- from ANY twin_not_void: Result /= Void is_equal: Result ~ Current feature -- Miscellaneous Cw_usedefault: INTEGER_32 = -2147483648 -- Declared in Windows as CW_USEDEFAULT -- (from WEL_WS_CONSTANTS) feature -- Basic operations auto_size -- Resize tooolbar after changes. -- An application sends the TB_AUTOSIZE message after -- causing the size of a toolbar to change either by -- setting the button or bitmap size or by adding strings -- for the first time. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists bring_to_top -- Bring this window to the top of the Z order. -- -- Note: -- * If the window is a top-level window, it is activated. -- * If the window is a child window, the top-level parent window -- associated with the child window is activated. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists clear_flag (flags, mask: INTEGER_32): INTEGER_32 -- Clear the mask in flags -- (from WEL_BIT_OPERATIONS) ensure -- from WEL_BIT_OPERATIONS flag_unset: not flag_set (Result, mask) cwin_hi_word (value: POINTER): INTEGER_32 -- SDK HIWORD -- (from WEL_WORD_OPERATIONS) cwin_lo_word (value: POINTER): INTEGER_32 -- SDK LOWORD -- (from WEL_WORD_OPERATIONS) cwin_make_long (low, high: INTEGER_32): POINTER -- SDK MAKELONG -- (from WEL_WORD_OPERATIONS) cwin_make_lparam (low, high: INTEGER_32): POINTER -- SKD MAKELPARAM -- (from WEL_WORD_OPERATIONS) frozen default: detachable WEL_IMAGELIST_TOOL_BAR -- Default value of object's type -- (from ANY) frozen default_pointer: POINTER -- Default value of type POINTER -- (Avoid the need to write p.`default` for -- some p of type POINTER.) -- (from ANY) ensure -- from ANY instance_free: class default_process_notification (notification_code: INTEGER_32) -- Process a notification_code which has not been -- processed by `process_notification`. -- (from WEL_CONTROL) require -- from WEL_CONTROL exists: exists default_rescue -- Process exception for routines with no Rescue clause. -- (Default: do nothing.) -- (from ANY) disable_horizontal_scroll_bar -- Disable the horizontal scroll bar. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists disable_vertical_scroll_bar -- Disable the vertical scroll bar. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists frozen do_nothing -- Execute a null action. -- (from ANY) ensure -- from ANY instance_free: class eif_current_object_id: INTEGER_32 -- New identifier for Current -- (from IDENTIFIED_ROUTINES) ensure -- from IDENTIFIED_ROUTINES eif_current_object_id: Result > 0 inserted: eif_is_object_id_of_current (Result) eif_id_any_object (an_id: INTEGER_32): detachable ANY -- Object associated with an_id -- (from IDENTIFIED_ROUTINES) require -- from IDENTIFIED_ROUTINES an_id_non_negative: an_id >= 0 ensure -- from IDENTIFIED_ROUTINES instance_free: class eif_is_object_id_of_current (an_id: INTEGER_32): BOOLEAN -- Is an_id the associated object ID of Current. -- (from IDENTIFIED_ROUTINES) require -- from IDENTIFIED_ROUTINES an_id_non_negative: an_id >= 0 eif_object_id (an_object: ANY): INTEGER_32 -- New identifier for an_object -- (from IDENTIFIED_ROUTINES) ensure -- from IDENTIFIED_ROUTINES instance_free: class eif_object_id_positive: Result > 0 inserted: eif_id_any_object (Result) = an_object eif_object_id_free (an_id: INTEGER_32) -- Free the entry an_id -- (from IDENTIFIED_ROUTINES) require -- from IDENTIFIED_ROUTINES an_id_non_negative: an_id >= 0 ensure -- from IDENTIFIED_ROUTINES instance_free: class removed: eif_id_any_object (an_id) = Void enable_horizontal_scroll_bar -- Enable the horizontal scroll bar. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists enable_vertical_scroll_bar -- Enable the vertical scroll bar. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists go_to_next_group_item (a_parent: WEL_COMPOSITE_WINDOW; after: BOOLEAN) -- Find the previous or following control with the -- Wm_tabstop style in the current group in a_parent -- depending on the value of after. -- (from WEL_CONTROL) require -- from WEL_CONTROL valid_parent: a_parent /= Void and then a_parent.exists go_to_next_tab_item (a_parent: WEL_COMPOSITE_WINDOW; after: BOOLEAN) -- Find the previous or following control with the -- Wm_tabstop style in `a_parent depending on the -- value of after. -- (from WEL_CONTROL) require -- from WEL_CONTROL valid_parent: a_parent /= Void and then a_parent.exists hide_cursor -- Hide the cursor. -- (from WEL_WINDOWS_ROUTINES) hide_horizontal_scroll_bar -- Hide the horizontal scroll bar. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists hide_scroll_bars -- Hide the horizontal and vertical scroll bars. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists hide_vertical_scroll_bar -- Hide the vertical scroll bar. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists insert_after (a_window: WEL_WINDOW) -- Insert the current window after a_window. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists a_window_not_void: a_window /= Void a_window_not_current: a_window /= Current a_window_exists: a_window.exists invalidate -- Invalide the entire client area of the window. The -- background will be erased before. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists invalidate_rect (rect: WEL_RECT; erase_background: BOOLEAN) -- Invalidate the area rect and erase -- the background if erase_background is True. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists rect_not_void: rect /= Void rect_exists: rect.exists invalidate_region (region: WEL_REGION; erase_background: BOOLEAN) -- Invalidate the area region and erase -- the background if erase_background is True. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists region_not_void: region /= Void region_exists: region.exists invalidate_without_background -- Invalidate the entire client area of the window. The -- background will not be erased. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists kill_timer (timer_id: INTEGER_32) -- Kill the timer identified by timer_id. -- See also `set_timer`, `on_timer`. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists positive_timer_id: timer_id > 0 message_beep_asterisk -- Play the system asterisk waveform sound. -- (from WEL_WINDOWS_ROUTINES) message_beep_exclamation -- Play the system exclamation waveform sound. -- (from WEL_WINDOWS_ROUTINES) message_beep_hand -- Play the system hand waveform sound. -- (from WEL_WINDOWS_ROUTINES) message_beep_ok -- Play the system ok waveform sound. -- (from WEL_WINDOWS_ROUTINES) message_beep_question -- Play the system question waveform sound. -- (from WEL_WINDOWS_ROUTINES) move (a_x, a_y: INTEGER_32) -- Move the window to a_x, a_y. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists move_and_resize (a_x, a_y, a_width, a_height: INTEGER_32; repaint: BOOLEAN) -- Move the window to a_x, a_y position and -- resize it with a_width, a_height. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists output_debug_string (s: READABLE_STRING_GENERAL) -- Send a string s to the system debugger. -- (from WEL_WINDOWS_ROUTINES) require -- from WEL_WINDOWS_ROUTINES s_not_void: s /= Void put_command (a_command: WEL_COMMAND; message: INTEGER_32; argument: detachable ANY) -- Put a_command associated to message. -- (from WEL_WINDOW) require -- from WEL_WINDOW a_command_not_void: a_command /= Void positive_message: message >= 0 ensure -- from WEL_WINDOW command_added: command (message) = a_command and command_argument (message) = argument remove_command (message: INTEGER_32) -- Remove the command associated to message. -- (from WEL_WINDOW) require -- from WEL_WINDOW positive_message: message >= 0 command_exists: command_exists (message) ensure -- from WEL_WINDOW command_removed: not command_exists (message) reposition -- Reposition the bar according to the parent. -- This function needs to be called in the -- `on_size` function of the parent. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists resize (a_width, a_height: INTEGER_32) -- Resize the window with a_width, a_height. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists resource_string_id (an_id: INTEGER_32): STRING_32 -- String identified by an_id in the resource file. -- (from WEL_WINDOWS_ROUTINES) ensure -- from WEL_WINDOWS_ROUTINES result_not_void: Result /= Void scroll (a_x, a_y: INTEGER_32) -- Scroll the contents of the window's client area. -- a_x and a_y specify the amount of horizontal -- and vertical scrolling. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists set_class_icon (new_icon: WEL_ICON) -- Replace the current icon for the class which this window -- belongs to. -- -- The SetClassLong function replaces the specified 32-bit (long) -- value at the specified offset into the extra class memory -- or the WNDCLASSEX structure for the class to which the -- specified window belongs. -- (from WEL_WINDOW) require -- from WEL_WINDOW new_icon_not_void: new_icon /= Void new_icon_exists: new_icon.exists set_class_small_icon (new_icon: WEL_ICON) -- Replace the current icon for the class which this window -- belongs to. -- -- The SetClassLong function replaces the specified 32-bit (long) -- value at the specified offset into the extra class memory -- or the WNDCLASSEX structure for the class to which the -- specified window belongs. -- (from WEL_WINDOW) require -- from WEL_WINDOW new_icon_not_void: new_icon /= Void new_icon_exists: new_icon.exists set_cursor_position_absolute (x, y: INTEGER_32) -- Set the cursor position to `x`, `y`. -- (from WEL_WINDOWS_ROUTINES) set_flag (flags, mask: INTEGER_32): INTEGER_32 -- Set the mask in flags -- (from WEL_BIT_OPERATIONS) ensure -- from WEL_BIT_OPERATIONS flag_set: flag_set (Result, mask) set_z_order (z_order: POINTER) -- Set the z-order of the window. -- See class WEL_HWND_CONSTANTS for z_order values. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists valid_hwnd_constant: valid_hwnd_constant (z_order) show_cursor -- Show the cursor. -- (from WEL_WINDOWS_ROUTINES) show_horizontal_scroll_bar -- Show the horizontal scroll bar. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists show_scroll_bars -- Show the horizontal and vertical scroll bars. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists show_vertical_scroll_bar -- Show the vertical scroll bar. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists show_with_option (cmd_show: INTEGER_32) -- Set the window's visibility with cmd_show. -- See class WEL_SW_CONSTANTS for cmd_show value. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists parent_shown: attached parent as l_parent implies l_parent.exists and l_parent.shown update -- Update the client area by sending a Wm_paint message. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists validate -- Validate the entire client area of the window. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists validate_rect (rect: WEL_RECT) -- Validate the area rect. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists rect_not_void: rect /= Void rect_exists: rect.exists validate_region (region: WEL_REGION) -- Validate the area region. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists region_not_void: region /= Void region_exists: region.exists win_help_from_path (help_path: PATH; a_command, data: INTEGER_32) -- Start the Windows Help program with help_path. -- a_command specifies the type of help requested. See -- class WEL_HELP_CONSTANTS for a_command values. -- 'data' is depandant on 'a_command'. Check MSDN for more details. -- (from WEL_WINDOW) require -- from WEL_WINDOW exists: exists help_file_not_void: help_path /= Void feature -- Inapplicable set_text (s: detachable READABLE_STRING_GENERAL) -- Set the window text -- (from WEL_TOOL_BAR) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW text_set_when_not_void: s /= Void implies text.same_string_general (s) text_set_when_void: s = Void implies text.count = 0 text: STRING_32 -- Window text -- (from WEL_TOOL_BAR) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW result_not_void: Result /= Void text_length: INTEGER_32 -- Text length -- (from WEL_TOOL_BAR) require -- from WEL_WINDOW exists: exists ensure -- from WEL_WINDOW positive_result: Result >= 0 text_substring (nb: INTEGER_32): WEL_STRING -- nb code units of `text` retrieved as a WEL_STRING. -- (from WEL_TOOL_BAR) require -- from WEL_WINDOW exists: exists valid_upper_bound: nb <= text_length feature -- "Shell and Common controls" Versions Comctl32_version: INTEGER_32 -- Version of Comctl32.dll -- (from WEL_WINDOWS_VERSION) Shell32_version: INTEGER_32 -- Version of Shell32.dll -- (from WEL_WINDOWS_VERSION) Shlwapi_version: INTEGER_32 -- Version of Shlwapi.dll -- (from WEL_WINDOWS_VERSION) feature -- Access Comctl32.dll >= 4.70 (Windows95 + IE4 and above) Tb_getbuttonsize: INTEGER_32 = 1082 -- Retrieves the current width and height of toolbar buttons, in -- pixels. -- (from WEL_TB_CONSTANTS) Tb_getdisabledimagelist: INTEGER_32 = 1079 -- Retrieves the image list that a toolbar control uses to display -- disabled buttons. -- (from WEL_TB_CONSTANTS) Tb_gethotimagelist: INTEGER_32 = 1077 -- Retrieves the image list that a toolbar control uses to display -- hot buttons. -- (from WEL_TB_CONSTANTS) Tb_getimagelist: INTEGER_32 = 1073 -- Retrieves the image list that a toolbar control uses to display -- buttons in their default state. A toolbar control uses this -- image list to display buttons when they are not hot or disabled -- (from WEL_TB_CONSTANTS) Tb_getrect: INTEGER_32 = 1075 -- Retrieves the bounding rectangle for a specified toolbar button -- (from WEL_TB_CONSTANTS) Tb_getstyle: INTEGER_32 = 1081 -- Retrieves the styles currently in use for a toolbar control. -- (from WEL_TB_CONSTANTS) Tb_gettextrows: INTEGER_32 = 1085 -- Retrieves the maximum number of text rows that can be -- displayed on a toolbar button. -- (from WEL_TB_CONSTANTS) Tb_loadimages: INTEGER_32 = 1074 -- Loads bitmaps into a toolbar control's image list. -- (from WEL_TB_CONSTANTS) Tb_setbuttonwidth: INTEGER_32 = 1083 -- Sets the minimum and maximum button widths in the toolbar -- control. -- (from WEL_TB_CONSTANTS) Tb_setdisabledimagelist: INTEGER_32 = 1078 -- Sets the image list that the toolbar control will use to display -- disabled buttons. -- (from WEL_TB_CONSTANTS) Tb_sethotimagelist: INTEGER_32 = 1076 -- Sets the image list that the toolbar control will use to -- display hot buttons. -- (from WEL_TB_CONSTANTS) Tb_setimagelist: INTEGER_32 = 1072 -- Set the image list that the toolbar will use -- to display buttons that are in their default state. -- (from WEL_TB_CONSTANTS) Tb_setindent: INTEGER_32 = 1071 -- Sets the indentation for the first button in a toolbar control -- (from WEL_TB_CONSTANTS) Tb_setmaxtextrows: INTEGER_32 = 1084 -- Sets the maximum number of text rows displayed on a toolbar -- button. -- (from WEL_TB_CONSTANTS) Tb_setstyle: INTEGER_32 = 1080 -- Sets the style for a toolbar control. -- (from WEL_TB_CONSTANTS) feature -- Access Comctl32.dll >= 4.71 (Windows95 + IE4 and above) Tb_getanchorhighlight: INTEGER_32 = 1098 -- Retrieves the anchor highlight setting for a toolbar. -- (from WEL_TB_CONSTANTS) Tb_getextendedstyle: INTEGER_32 = 1109 -- Retrieves the extended styles for a toolbar control. -- (from WEL_TB_CONSTANTS) Tb_gethotitem: INTEGER_32 = 1095 -- Retrieves the index of the hot item in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_getinsertmark: INTEGER_32 = 1103 -- Retrieves the current insertion mark for the toolbar. -- (from WEL_TB_CONSTANTS) Tb_getinsertmarkcolor: INTEGER_32 = 1113 -- Retrieves the color used to draw the insertion mark for the toolbar. -- (from WEL_TB_CONSTANTS) Tb_getmaxsize: INTEGER_32 = 1107 -- Retrieves the total size of all of the visible buttons and separators in the toolbar. -- (from WEL_TB_CONSTANTS) Tb_getobject: INTEGER_32 = 1086 -- Retrieves the IDropTarget for a toolbar control. -- (from WEL_TB_CONSTANTS) Tb_getpadding: INTEGER_32 = 1110 -- Retrieves the padding for a toolbar control. -- (from WEL_TB_CONSTANTS) Tb_insertmarkhittest: INTEGER_32 = 1105 -- Retrieves the insertion mark information for a point in a toolbar. -- (from WEL_TB_CONSTANTS) Tb_movebutton: INTEGER_32 = 1106 -- Moves a button from one index to another. -- (from WEL_TB_CONSTANTS) Tb_setanchorhighlight: INTEGER_32 = 1097 -- Sets the anchor highlight setting for a toolbar. -- (from WEL_TB_CONSTANTS) Tb_setextendedstyle: INTEGER_32 = 1108 -- Sets the extended styles for a toolbar control. -- (from WEL_TB_CONSTANTS) Tb_sethotitem: INTEGER_32 = 1096 -- Sets the hot item in a toolbar. -- This message is ignored for toolbar controls that do not have the -- TBSTYLE_FLAT style. -- (from WEL_TB_CONSTANTS) Tb_setinsertmark: INTEGER_32 = 1104 -- Sets the current insertion mark for the toolbar. -- (from WEL_TB_CONSTANTS) Tb_setinsertmarkcolor: INTEGER_32 = 1112 -- Sets the color used to draw the insertion mark for the toolbar. -- (from WEL_TB_CONSTANTS) Tb_setpadding: INTEGER_32 = 1111 -- Sets the padding for a toolbar control. -- (from WEL_TB_CONSTANTS) feature -- Basic window types Ws_child: INTEGER_32 = 1073741824 -- Declared in Windows as WS_CHILD -- (from WEL_WS_CONSTANTS) Ws_overlapped: INTEGER_32 = 0 -- Declared in Windows as WS_OVERLAPPED -- Was declared in {WEL_WS_CONSTANTS} as synonym of `ws_tiled`. -- (from WEL_WS_CONSTANTS) Ws_popup: INTEGER_32 = -2147483648 -- Declared in Windows as WS_POPUP -- (from WEL_WS_CONSTANTS) Ws_tiled: INTEGER_32 = 0 -- Declared in Windows as WS_OVERLAPPED -- Was declared in {WEL_WS_CONSTANTS} as synonym of `ws_overlapped`. -- (from WEL_WS_CONSTANTS) feature -- Clipping styles Ws_clipchildren: INTEGER_32 = 33554432 -- Declared in Windows as WS_CLIPCHILDREN -- (from WEL_WS_CONSTANTS) Ws_clipsiblings: INTEGER_32 = 67108864 -- Declared in Windows as WS_CLIPSIBLINGS -- (from WEL_WS_CONSTANTS) feature -- Common window styles Ws_childwindow: INTEGER_32 = 1073741824 -- Declared in Windows as WS_CHILDWINDOW -- (from WEL_WS_CONSTANTS) Ws_overlappedwindow: INTEGER_32 = 13565952 -- Declared in Windows as WS_OVERLAPPEDWINDOW -- Was declared in {WEL_WS_CONSTANTS} as synonym of `ws_tiledwindow`. -- (from WEL_WS_CONSTANTS) Ws_popupwindow: INTEGER_32 = -2138570752 -- Declared in Windows as WS_POPUPWINDOW -- (from WEL_WS_CONSTANTS) Ws_tiledwindow: INTEGER_32 = 13565952 -- Declared in Windows as WS_OVERLAPPEDWINDOW -- Was declared in {WEL_WS_CONSTANTS} as synonym of `ws_overlappedwindow`. -- (from WEL_WS_CONSTANTS) feature -- Compatible Windows Versions is_windows_2000_compatible: BOOLEAN -- Is the current program running under Windows 2000 or above? -- (from WEL_WINDOWS_VERSION) is_windows_98_compatible: BOOLEAN -- Is the current program running under Windows 98 or above? -- (from WEL_WINDOWS_VERSION) is_windows_9x: BOOLEAN -- Is the current program running under Windows 9x -- (Windows 95, Windows 98, Windows Me, ...)? -- (from WEL_WINDOWS_VERSION) is_windows_me_compatible: BOOLEAN -- Is the current program running under Windows Me or above? -- (from WEL_WINDOWS_VERSION) is_windows_nt: BOOLEAN -- Is the current program running under a version of -- windows belonging to the NT family? -- (Windows NT 3.51, Windows NT4, Windows 2000, -- Windows XP Home/Professional, Windows Vista) -- (from WEL_WINDOWS_VERSION) is_windows_nt4_compatible: BOOLEAN -- Is the current program running under Windows NT4 or above? -- (from WEL_WINDOWS_VERSION) is_windows_xp_compatible: BOOLEAN -- Is the current program running under Windows XP or above? -- (from WEL_WINDOWS_VERSION) feature -- Constants Esb_disable_both: INTEGER_32 = 3 -- Disables both arrows on a scroll bar. -- (from WEL_ESB_CONSTANTS) Esb_disable_down: INTEGER_32 = 2 -- Disables the down arrow on a vertical scroll bar. -- (from WEL_ESB_CONSTANTS) Esb_disable_left: INTEGER_32 = 1 -- Disables the left arrow on a horizontal scroll bar. -- (from WEL_ESB_CONSTANTS) Esb_disable_ltup: INTEGER_32 = 1 -- Disables the left arrow on a horizontal scroll bar -- or the up arrow on a vertical scroll bar. -- (from WEL_ESB_CONSTANTS) Esb_disable_rtdn: INTEGER_32 = 2 -- Disables the right arrow on a horizontal scroll bar -- or the down arrow on a vertical scroll bar. -- (from WEL_ESB_CONSTANTS) Esb_disable_up: INTEGER_32 = 1 -- Disables the up arrow on a vertical scroll bar. -- (from WEL_ESB_CONSTANTS) Esb_enable_both: INTEGER_32 = 0 -- Enables both arrows on a scroll bar. -- (from WEL_ESB_CONSTANTS) feature -- Control window styles Ws_group: INTEGER_32 = 131072 -- Declared in Windows as WS_GROUP -- (from WEL_WS_CONSTANTS) Ws_tabstop: INTEGER_32 = 65536 -- Declared in Windows as WS_TABSTOP -- (from WEL_WS_CONSTANTS) feature -- Conversion from Eiffel to Windows frozen to_lparam (i: INTEGER_32): POINTER -- Convert integer value i in a valid LPARAM value. -- (from WEL_DATA_TYPE) ensure -- from WEL_DATA_TYPE is_class: class frozen to_lresult (i: INTEGER_32): POINTER -- Convert integer value i in a valid LRESULT value. -- (from WEL_DATA_TYPE) ensure -- from WEL_DATA_TYPE is_class: class frozen to_wparam (i: INTEGER_32): POINTER -- Convert integer value i in a valid WPARAM value. -- (from WEL_DATA_TYPE) ensure -- from WEL_DATA_TYPE is_class: class feature -- Current Windows Version build_number: INTEGER_32 -- Build number of current operating system -- (from WEL_WINDOWS_VERSION) require -- from WEL_WINDOWS_VERSION windows_nt_family: is_windows_nt major_version: INTEGER_32 -- Major version of current operating system -- (from WEL_WINDOWS_VERSION) minor_version: INTEGER_32 -- Minor version of current operating system -- (from WEL_WINDOWS_VERSION) version_info: detachable WEL_OS_VERSION_INFO -- Associated WEL_OS_VERSION_INFO structure -- (from WEL_WINDOWS_VERSION) feature -- Element Change set_default_processing (value: BOOLEAN) -- Enable or disable default processing of window messages. -- (from WEL_RETURN_VALUE) ensure -- from WEL_RETURN_VALUE value_set: default_processing = value set_message_return_value (value: POINTER) -- Set the window-procedure-return-value. -- (from WEL_RETURN_VALUE) ensure -- from WEL_RETURN_VALUE has_return_value: has_return_value value_set: message_return_value = value feature -- Exact Windows Versions is_windows_2000: BOOLEAN -- Is the current program running under Windows 2000? -- (from WEL_WINDOWS_VERSION) ensure -- from WEL_WINDOWS_VERSION windows2000_is_nt: Result implies is_windows_nt is_windows_95: BOOLEAN -- Is the current program running under Windows 95 -- (OSR1, OSR2 or OSR2.5)? -- (from WEL_WINDOWS_VERSION) ensure -- from WEL_WINDOWS_VERSION windows95_is_9x: Result implies is_windows_9x is_windows_98: BOOLEAN -- Is the current program running under Windows 98 -- (1st or 2nd edition)? -- (from WEL_WINDOWS_VERSION) ensure -- from WEL_WINDOWS_VERSION windows98_is_9x: Result implies is_windows_9x is_windows_me: BOOLEAN -- Is the current program running under Windows Millenium Edition? -- (from WEL_WINDOWS_VERSION) ensure -- from WEL_WINDOWS_VERSION windows_me_is_9x: Result implies is_windows_9x is_windows_nt4: BOOLEAN -- Is the current program running under Windows NT4? -- (from WEL_WINDOWS_VERSION) ensure -- from WEL_WINDOWS_VERSION windows_nt4_is_nt: Result implies is_windows_nt is_windows_vista: BOOLEAN -- If the current program running under Windows Vista? -- (from WEL_WINDOWS_VERSION) is_windows_xp: BOOLEAN -- Is the current program running under Windows XP (Home or Professional)? -- (from WEL_WINDOWS_VERSION) ensure -- from WEL_WINDOWS_VERSION windows_xp_is_nt: Result implies is_windows_nt feature -- Extended window styles Ws_ex_acceptfiles: INTEGER_32 = 16 -- Declared in Windows as WS_EX_ACCEPTFILES -- (from WEL_WS_CONSTANTS) Ws_ex_appwindow: INTEGER_32 = 262144 -- (from WEL_WS_CONSTANTS) Ws_ex_clientedge: INTEGER_32 = 512 -- Declared in Windows as WS_EX_CLIENTEDGE -- (from WEL_WS_CONSTANTS) Ws_ex_composited: INTEGER_32 = 33554432 -- Declared in Windows as WS_EX_COMPOSITED -- (from WEL_WS_CONSTANTS) Ws_ex_contexthelp: INTEGER_32 = 1024 -- Declared in Windows as WS_EX_CONTEXTHELP -- (from WEL_WS_CONSTANTS) Ws_ex_controlparent: INTEGER_32 = 65536 -- Declared in Windows as WS_EX_CONTROLPARENT -- (from WEL_WS_CONSTANTS) Ws_ex_dlgmodalframe: INTEGER_32 = 1 -- Declared in Windows as WS_EX_DLGMODALFRAME -- (from WEL_WS_CONSTANTS) Ws_ex_layered: INTEGER_32 = 524288 -- Declared in Windows as WS_EX_LAYERED -- (from WEL_WS_CONSTANTS) Ws_ex_left: INTEGER_32 = 0 -- Declared in Windows as WS_EX_LEFT -- (from WEL_WS_CONSTANTS) Ws_ex_leftscrollbar: INTEGER_32 = 16384 -- Declared in Windows as WS_EX_LEFTSCROLLBAR -- (from WEL_WS_CONSTANTS) Ws_ex_ltrreading: INTEGER_32 = 0 -- Declared in Windows as WS_EX_LTRREADING -- (from WEL_WS_CONSTANTS) Ws_ex_mdichild: INTEGER_32 = 64 -- Declared in Windows as WS_EX_MDICHILD -- (from WEL_WS_CONSTANTS) Ws_ex_noactivate: INTEGER_32 = 134217728 -- Declared in Windows as WS_EX_NOACTIVATE -- (from WEL_WS_CONSTANTS) Ws_ex_noparentnotify: INTEGER_32 = 4 -- Declared in Windows as WS_EX_NOPARENTNOTIFY -- (from WEL_WS_CONSTANTS) Ws_ex_overlappedwindow: INTEGER_32 = 768 -- Declared in Windows as WS_EX_OVERLAPPEDWINDOW -- (from WEL_WS_CONSTANTS) Ws_ex_palettewindow: INTEGER_32 = 392 -- Declared in Windows as WS_EX_PALETTEWINDOW -- (from WEL_WS_CONSTANTS) Ws_ex_right: INTEGER_32 = 4096 -- Declared in Windows as WS_EX_RIGHT -- (from WEL_WS_CONSTANTS) Ws_ex_rightscrollbar: INTEGER_32 = 0 -- Declared in Windows as WS_EX_RIGHTSCROLLBAR -- (from WEL_WS_CONSTANTS) Ws_ex_rtlreading: INTEGER_32 = 8192 -- Declared in Windows as WS_EX_RTLREADING -- (from WEL_WS_CONSTANTS) Ws_ex_staticedge: INTEGER_32 = 131072 -- Declared in Windows as WS_EX_STATICEDGE -- (from WEL_WS_CONSTANTS) Ws_ex_toolwindow: INTEGER_32 = 128 -- Declared in Windows as WS_EX_TOOLWINDOW -- (from WEL_WS_CONSTANTS) Ws_ex_topmost: INTEGER_32 = 8 -- Declared in Windows as WS_EX_TOPMOST -- (from WEL_WS_CONSTANTS) Ws_ex_transparent: INTEGER_32 = 32 -- Declared in Windows as WS_EX_TRANSPARENT -- (from WEL_WS_CONSTANTS) Ws_ex_windowedge: INTEGER_32 = 256 -- Declared in Windows as WS_EX_WINDOWEDGE -- (from WEL_WS_CONSTANTS) feature -- For dialogs frozen dwlp_dlgproc: INTEGER_32 -- (from WEL_GWL_CONSTANTS) frozen dwlp_msgresult: INTEGER_32 -- (from WEL_GWL_CONSTANTS) frozen dwlp_user: INTEGER_32 -- (from WEL_GWL_CONSTANTS) feature -- For windows Gwl_hinstance: INTEGER_32 = -6 -- Was declared in {WEL_GWL_CONSTANTS} as synonym of `gwlp_hinstance`. -- (from WEL_GWL_CONSTANTS) Gwl_hwndparent: INTEGER_32 = -8 -- Was declared in {WEL_GWL_CONSTANTS} as synonym of `gwlp_hwndparent`. -- (from WEL_GWL_CONSTANTS) Gwl_id: INTEGER_32 = -12 -- Was declared in {WEL_GWL_CONSTANTS} as synonym of `gwlp_id`. -- (from WEL_GWL_CONSTANTS) Gwl_userdata: INTEGER_32 = -21 -- Was declared in {WEL_GWL_CONSTANTS} as synonym of `gwlp_userdata`. -- (from WEL_GWL_CONSTANTS) Gwl_wndproc: INTEGER_32 = -4 -- Was declared in {WEL_GWL_CONSTANTS} as synonym of `gwlp_wndproc`. -- (from WEL_GWL_CONSTANTS) Gwlp_hinstance: INTEGER_32 = -6 -- Was declared in {WEL_GWL_CONSTANTS} as synonym of `gwl_hinstance`. -- (from WEL_GWL_CONSTANTS) Gwlp_hwndparent: INTEGER_32 = -8 -- Was declared in {WEL_GWL_CONSTANTS} as synonym of `gwl_hwndparent`. -- (from WEL_GWL_CONSTANTS) Gwlp_id: INTEGER_32 = -12 -- Was declared in {WEL_GWL_CONSTANTS} as synonym of `gwl_id`. -- (from WEL_GWL_CONSTANTS) Gwlp_userdata: INTEGER_32 = -21 -- Was declared in {WEL_GWL_CONSTANTS} as synonym of `gwl_userdata`. -- (from WEL_GWL_CONSTANTS) Gwlp_wndproc: INTEGER_32 = -4 -- Was declared in {WEL_GWL_CONSTANTS} as synonym of `gwl_wndproc`. -- (from WEL_GWL_CONSTANTS) feature -- Generic window states Ws_disabled: INTEGER_32 = 134217728 -- Declared in Windows as WS_DISABLED -- (from WEL_WS_CONSTANTS) Ws_visible: INTEGER_32 = 268435456 -- Declared in Windows as WS_VISIBLE -- (from WEL_WS_CONSTANTS) feature -- Main window states Ws_iconic: INTEGER_32 = 536870912 -- Declared in Windows as WS_MINIMIZE -- Was declared in {WEL_WS_CONSTANTS} as synonym of `ws_minimize`. -- (from WEL_WS_CONSTANTS) Ws_maximize: INTEGER_32 = 16777216 -- Declared in Windows as WS_MAXIMIZE -- (from WEL_WS_CONSTANTS) Ws_minimize: INTEGER_32 = 536870912 -- Declared in Windows as WS_MINIMIZE -- Was declared in {WEL_WS_CONSTANTS} as synonym of `ws_iconic`. -- (from WEL_WS_CONSTANTS) feature -- Main window styles Ws_border: INTEGER_32 = 8388608 -- Declared in Windows as WS_BORDER -- (from WEL_WS_CONSTANTS) Ws_caption: INTEGER_32 = 12582912 -- Declared in Windows as WS_CAPTION -- (from WEL_WS_CONSTANTS) Ws_dlgframe: INTEGER_32 = 4194304 -- Declared in Windows as WS_DLGFRAME -- (from WEL_WS_CONSTANTS) Ws_hscroll: INTEGER_32 = 1048576 -- Declared in Windows as WS_HSCROLL -- (from WEL_WS_CONSTANTS) Ws_maximizebox: INTEGER_32 = 65536 -- Declared in Windows as WS_MAXIMIZEBOX -- (from WEL_WS_CONSTANTS) Ws_minimizebox: INTEGER_32 = 131072 -- Declared in Windows as WS_MINIMIZEBOX -- (from WEL_WS_CONSTANTS) Ws_sizebox: INTEGER_32 = 262144 -- Declared in Windows as WS_THICKFRAME -- Was declared in {WEL_WS_CONSTANTS} as synonym of `ws_thickframe`. -- (from WEL_WS_CONSTANTS) Ws_sysmenu: INTEGER_32 = 524288 -- Declared in Windows as WS_SYSMENU -- (from WEL_WS_CONSTANTS) Ws_thickframe: INTEGER_32 = 262144 -- Declared in Windows as WS_THICKFRAME -- Was declared in {WEL_WS_CONSTANTS} as synonym of `ws_sizebox`. -- (from WEL_WS_CONSTANTS) Ws_vscroll: INTEGER_32 = 2097152 -- Declared in Windows as WS_VSCROLL -- (from WEL_WS_CONSTANTS) feature -- Markers fixme (comment: READABLE_STRING_8) -- Mark code that has to be "fixed" with comment. -- (from REFACTORING_HELPER) require -- from REFACTORING_HELPER comment_not_void: comment /= Void ensure -- from REFACTORING_HELPER instance_free: class to_implement (comment: READABLE_STRING_8) -- Mark code that has to be "implemented" with comment. -- (from REFACTORING_HELPER) require -- from REFACTORING_HELPER comment_not_void: comment /= Void ensure -- from REFACTORING_HELPER instance_free: class to_implement_assertion (comment: READABLE_STRING_8): BOOLEAN -- Mark assertion that has to be "implemented" with comment. -- (from REFACTORING_HELPER) require -- from REFACTORING_HELPER comment_not_void: comment /= Void ensure -- from REFACTORING_HELPER instance_free: class feature -- Notifications on_tbn_beginadjust -- The user has begun customizing the toolbar. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists on_tbn_begindrag (info: WEL_NM_TOOL_BAR) -- The user has begun dragging a button in the toolbar. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists info_not_void: info /= Void info_exists: info.exists on_tbn_custhelp -- The user has chosen the Help button in the -- customize toolbar dialog box. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists on_tbn_dropdown (info: WEL_NM_TOOL_BAR) -- The user clicks a button that use the -- Tbstyle_dropdown style. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists info_not_void: info /= Void info_exists: info.exists on_tbn_endadjust -- The user has stopped customizing the toolbar. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists on_tbn_enddrag (info: WEL_NM_TOOL_BAR) -- The user has stopped dragging a button in the toolbar. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists info_not_void: info /= Void info_exists: info.exists on_tbn_getbuttoninfo (info: WEL_NM_TOOL_BAR) -- Retrieves toolbar customization. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists info_not_void: info /= Void info_exists: info.exists on_tbn_querydelete (info: WEL_NM_TOOL_BAR) -- A button may be deleted from the toolbar while -- the user is customizing the toolbar. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists info_not_void: info /= Void info_exists: info.exists on_tbn_queryinsert (info: WEL_NM_TOOL_BAR) -- A button may be inserted to the left of the -- specified button while the user is customizing -- the toolbar. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists info_not_void: info /= Void info_exists: info.exists on_tbn_reset -- The user has reset the content of the customise -- toolbar dialog box. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists on_tbn_toolbarchange -- The user has customized the toolbar. -- (from WEL_TOOL_BAR) require -- from WEL_TOOL_BAR exists: exists feature -- Output Io: STD_FILES -- Handle to standard file setup -- (from ANY) ensure -- from ANY instance_free: class io_not_void: Result /= Void out: STRING_8 -- New string containing terse printable representation -- of current object -- (from ANY) ensure -- from ANY out_not_void: Result /= Void print (o: detachable ANY) -- Write terse external representation of o -- on standard output. -- (from ANY) ensure -- from ANY instance_free: class frozen tagged_out: STRING_8 -- New string containing terse printable representation -- of current object -- (from ANY) ensure -- from ANY tagged_out_not_void: Result /= Void feature -- Platform Operating_environment: OPERATING_ENVIRONMENT -- Objects available from the operating system -- (from ANY) ensure -- from ANY instance_free: class operating_environment_not_void: Result /= Void feature -- Registration is_registered: BOOLEAN -- Is window registered? -- (from WEL_WINDOW) frozen register_current_window -- Register Current in window manager. -- (from WEL_WINDOW) ensure -- from WEL_WINDOW registered: is_registered feature -- Tool bar button styles Btns_autosize: INTEGER_32 = 16 -- Version 5.80. Specifies that the toolbar control should -- not assign the standard width to the button. Instead, -- the button's width will be calculated based on the width -- of the text plus the image of the button. -- Use the equivalent style flag, TBSTYLE_AUTOSIZE, for -- version 4.72 and earlier. -- (from WEL_TB_STYLE_CONSTANTS) Btns_dropdown: INTEGER_32 = 8 -- Version 5.80. Creates a drop-down style button that -- can display a list when the button is clicked. Instead -- of the WM_COMMAND message used for normal buttons, -- drop-down buttons send a TBN_DROPDOWN notification. -- An application can then have the notification handler -- display a list of options. Use the equivalent style -- flag, TBSTYLE_DROPDOWN, for version 4.72 and earlier. -- If the toolbar has the TBSTYLE_EX_DRAWDDARROWS extended -- style, drop-down buttons will have a drop-down arrow -- displayed in a separate section to their right. If the -- arrow is clicked, a TBN_DROPDOWN notification will be -- sent. If the associated button is clicked, a WM_COMMAND -- message will be sent. -- (from WEL_TB_STYLE_CONSTANTS) Btns_showtext: INTEGER_32 = 64 -- Version 5.81. Specifies that button text should be -- displayed. All buttons can have text, but only those -- buttons with the BTNS_SHOWTEXT button style will -- display it. This button style must be used with the -- TBSTYLE_LIST style and the TBSTYLE_EX_MIXEDBUTTONS -- extended style. If you set text for buttons that do -- not have the BTNS_SHOWTEXT style, the toolbar control -- will automatically display it as a ToolTip when the -- cursor hovers over the button. This feature allows your -- application to avoid handling the TBN_GETINFOTIP -- notification for the toolbar. -- (from WEL_TB_STYLE_CONSTANTS) feature -- Tool bar extended styles Tbstyle_ex_doublebuffer: INTEGER_32 = 128 -- Version 6. This style requires the toolbar to be double -- buffered. Double buffering is a mechanism that detects when -- the toolbar has changed. -- Note Comctl32.dll version 6 is not redistributable but it -- is included in Microsoft Windows XP or later. To use -- Comctl32.dll version 6, specify it in a manifest. For more -- information on manifests, see Using Windows XP Visual Styles. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_ex_drawddarrows: INTEGER_32 = 1 -- Version 4.71. This style allows buttons to have a separate -- dropdown arrow. Buttons that have the BTNS_DROPDOWN style -- will be drawn with a drop-down arrow in a separate section, -- to the right of the button. If the arrow is clicked, only -- the arrow portion of the button will depress, and the toolbar -- control will send a TBN_DROPDOWN notification to prompt the -- application to display the dropdown menu. If the main part -- of the button is clicked, the toolbar control sends a -- WM_COMMAND message with the button's ID. The application -- normally responds by launching the first command on the menu. -- There are many situations where you may want to have only -- some of the dropdown buttons on a toolbar with separated. -- To do so, set the TBSTYLE_EX_DRAWDDARROWS extended style. -- Give those buttons that will not have separated arrows the -- BTNS_WHOLEDROPDOWN style. Buttons with this style will have -- an arrow displayed next to the image. However, the arrow will -- not be separate and when any part of the button is clicked, -- the toolbar control will send a TBN_DROPDOWN notification. -- To prevent repainting problems, this style should be set -- before the toolbar control becomes visible. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_ex_hideclippedbuttons: INTEGER_32 = 16 -- Version 5.81. This style hides partially clipped buttons. -- The most common use of this style is for toolbars that are -- part of a rebar control. If an adjacent band covers part of -- a button, the button will not be displayed. However, if the -- rebar band has the RBBS_USECHEVRON style, the button will be -- displayed on the chevron's dropdown menu. -- (from WEL_TB_STYLE_CONSTANTS) Tbstyle_ex_mixedbuttons: INTEGER_32 = 8 -- Version 5.81. This style allows you to set text for all -- buttons, but only display it for those buttons with the -- BTNS_SHOWTEXT button style. The TBSTYLE_LIST style must also -- be set. Normally, when a button does not display text, your -- application must handle TBN_GETINFOTIP to display a ToolTip. -- With the TBSTYLE_EX_MIXEDBUTTONS extended style, text that -- is set but not displayed on a button will automatically be -- used as the button's ToolTip text. Your application only -- needs to handle TBN_GETINFOTIP if it needs more flexibility -- in specifying the ToolTip text. -- (from WEL_TB_STYLE_CONSTANTS) feature -- Version Constants Version_400: INTEGER_32 = 262144 -- version_400 <=> Microsoft Windows 95/Windows NT 4.0 -- (from WEL_WINDOWS_VERSION) Version_470: INTEGER_32 = 262214 -- version_470 <=> Microsoft Internet Explorer 3.x -- (from WEL_WINDOWS_VERSION) Version_471: INTEGER_32 = 262215 -- version_471 <=> Microsoft Internet Explorer 4.0 -- (from WEL_WINDOWS_VERSION) Version_472: INTEGER_32 = 262216 -- version_472 <=> Microsoft Internet Explorer 4.01 & Windows 98 -- (from WEL_WINDOWS_VERSION) Version_500: INTEGER_32 = 327680 -- version_500 (Shlwapi.dll) <=> Microsoft Internet Explorer 5 -- version_500 (Shell32.dll) <=> Microsoft Windows 2000 -- (from WEL_WINDOWS_VERSION) Version_580: INTEGER_32 = 327760 -- version_580 (Comctl32.dll) <=> Microsoft Internet Explorer 5 -- (from WEL_WINDOWS_VERSION) Version_581: INTEGER_32 = 327761 -- version_581 (Comctl32.dll)<=> Microsoft Windows 2000 -- (from WEL_WINDOWS_VERSION) Version_600: INTEGER_32 = 393216 -- version_600 (Comctl32.dll)<=> Microsoft Windows XP -- (from WEL_WINDOWS_VERSION) feature -- Windows Versions (output) version_number_string: STRING_8 -- String representing the version number using the following format -- <major_version>.<minor_version>.<build_number> for Windows NT, 2000, XP -- <major_version>.<minor_version> for Windows 95, 98, Me -- (from WEL_WINDOWS_VERSION) invariant -- from ANY reflexive_equality: standard_is_equal (Current) reflexive_conformance: conforms_to (Current) note copyright: "Copyright (c) 1984-2006, Eiffel Software and others" license: "Eiffel Forum License v2 (see http://www.eiffel.com/licensing/forum.txt)" source: "[ Eiffel Software 356 Storke Road, Goleta, CA 93117 USA Telephone 805-685-1006, Fax 805-685-6869 Website http://www.eiffel.com Customer support http://support.eiffel.com ]" end -- class WEL_IMAGELIST_TOOL_BAR -- Generated by Eiffel Studio --
For more details: eiffel.org