$PBExportHeader$n_explorer.sru $PBExportComments$Explorer forward global type n_explorer from n_base end type type str_module from structure within n_explorer end type end forward type str_module from structure string classname string displayname integer id integer itemhandle treeviewitem tvitem u_explorer object integer mode end type global type n_explorer from n_base event ke_toolbar_buttonclicked ( readonly string buttonid, readonly string buttontext, readonly string buttondata ) event ke_toolbar_dropdown ( readonly string buttonid, readonly string buttontext, readonly string buttondata, readonly integer popx, readonly integer popy ) event type integer ke_closeallmodules ( ) event type boolean ke_canclosemodule ( ) event ke_closemodule ( ) event ke_maxtabsreached ( ) event type integer ke_tvselectionchanging ( readonly integer oldhandle, readonly integer newhandle ) event ke_tvselectionchanged ( readonly integer oldhandle, readonly integer newhandle ) event type integer ke_tabselectionchanging ( readonly integer oldindex, readonly integer newindex ) event type boolean ke_canclosetab ( readonly integer ai_index ) event ke_moduleopened ( readonly string as_classname, readonly string as_title ) end type global n_explorer n_explorer type variables Public: string #ModuleDatastore integer #MaxList = 10 Protected: n_explorer_navigator inv_nav u_tv_explorer itv //treeview u_sheets_explorer iuo_sheets //sheet tab u_dwtb_explorer iuo_dwtoolbar //dwtoolbar u_splitcontainer_explorer iuo_splitter //splitconatiner u_border_explorer iuo_title //border title u_statusbar_explorer iuo_statusbar //status bar Private: str_module istr_modules[] n_ds ids_modules u_explorer iuo_current_explorer CONSTANT string BACK_BUTTON = "1" CONSTANT string FORWARD_BUTTON = "2" CONSTANT string FOLDER_BUTTON = "5" CONSTANT string UP_BUTTON = "3" CONSTANT string CLOSE_BUTTON = "7" boolean ib_fromtabselection boolean FORCE_CLOSE end variables forward prototypes public subroutine of_uponefolder () public subroutine of_showtreepane (readonly boolean ab_show) public function integer of_getobjectindex (readonly dragobject ado) protected function integer of_getavailableindex () public function u_statusbar_explorer of_getexplorerstatusbar () public function u_border_explorer of_getexplorertitle () public function u_tv_explorer of_getexplorertreeview () public function u_dwtb_explorer of_getexplorertoolbar () public function u_sheets_explorer of_getexplorersheets () public function u_splitcontainer_explorer of_getexplorersplitter () public subroutine of_registertreeview (readonly u_tv_explorer atv) public subroutine of_registertitlebar (readonly u_border_explorer auo_titlebar) public subroutine of_registerstatusbar (readonly u_statusbar_explorer auo_statusbar) public subroutine of_registersplitter (readonly u_splitcontainer_explorer auo_splitter) public subroutine of_registersheets (readonly u_sheets_explorer auo_sheets) public subroutine of_registertoolbar (readonly u_dwtb_explorer auo_toolbar) public subroutine of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_dwtb_explorer auo_toolbar, readonly u_splitcontainer_explorer auo_splitter, readonly u_border_explorer auo_titlebar, readonly u_statusbar_explorer auo_statusbar) public subroutine of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_dwtb_explorer auo_toolbar, readonly u_splitcontainer_explorer auo_splitter, readonly u_border_explorer auo_titlebar) public subroutine of_lockcontrols (readonly boolean ab_lock) public function integer of_cleanup () public function integer of_focuscurrentmodule () public subroutine of_forceclose () public function u_explorer of_openmodule (readonly long al_itemhandle) public subroutine of_setmode (readonly u_explorer auo, readonly integer ai_mode) public subroutine of_setmodules (readonly n_ds ads) public function integer of_populatemodules () public subroutine of_setmodules (readonly string ads) public subroutine of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets) public subroutine of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_splitcontainer_explorer auo_splitter) public function string of_getclassnamefromnode (readonly long nodeid) public subroutine of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_dwtb_explorer auo_toolbar, readonly u_splitcontainer_explorer auo_splitter) end prototypes event ke_toolbar_buttonclicked(readonly string buttonid, readonly string buttontext, readonly string buttondata);CHOOSE CASE buttonid CASE BACK_BUTTON IF ISVALID(inv_nav) THEN inv_nav.EVENT ke_back() CASE FORWARD_BUTTON IF ISVALID(inv_nav) THEN inv_nav.EVENT ke_forward() CASE FOLDER_BUTTON of_showtreepane(NOT iuo_dwtoolbar.of_IsButtonChecked(buttonid)) CASE UP_BUTTON of_UpOneFolder() CASE CLOSE_BUTTON EVENT ke_closemodule() END CHOOSE end event event ke_toolbar_dropdown(readonly string buttonid, readonly string buttontext, readonly string buttondata, readonly integer popx, readonly integer popy);CHOOSE CASE buttonid CASE BACK_BUTTON IF ISVALID(inv_nav) THEN inv_nav.of_PopMenuBack(popx, popy) CASE FORWARD_BUTTON IF ISVALID(inv_nav) THEN inv_nav.of_PopMenuForward(popx, popy) CASE CLOSE_BUTTON str_menuitem lstr[] lstr[1].menutext = "Close All Modules" lstr[1].subscriber = this lstr[1].eventname = "ke_closeallmodules" n_svc_mgr lnv_svc n_svc_menu lnv_m lnv_svc.of_LoadSvc(lnv_m, CSvc.MENU) lnv_m.of_createmenu(lstr, popx, popy) END CHOOSE end event event type integer ke_closeallmodules();long ll_count, n dragobject ldo integer li_index ll_count = UPPERBOUND(istr_modules) iuo_sheets.of_SuspendRefresh() IF FORCE_CLOSE THEN iuo_sheets.of_CloseAllTabs() RETURN CRet.SUCCESS END IF FOR n = ll_count to 1 STEP -1 IF n = 1 THEN CONTINUE IF NOT ISVALID(istr_modules[n].object) THEN CONTINUE IF NOT istr_modules[n].object.EVENT ke_canclose() THEN iuo_sheets.of_Selecttab(istr_modules[n].object) iuo_sheets.of_ResumeRefresh() IF istr_modules[n].object.EVENT ke_explorer_closequery() = CRet.FAILURE THEN //stop closing RETURN CRet.FAILURE ELSE iuo_sheets.of_suspendrefresh() li_index = of_GetObjectIndex(istr_modules[n].object) IF li_index > 0 THEN iuo_sheets.of_Closetab(li_index, FALSE) END IF END IF ELSE li_index = of_GetObjectIndex(istr_modules[n].object) IF li_index > 0 THEN iuo_sheets.of_Closetab(li_index, FALSE) END IF END IF NEXT iuo_sheets.of_Selecttab(1) iuo_sheets.of_ResumeRefresh() RETURN CRet.SUCCESS end event event type boolean ke_canclosemodule();IF NOT ISVALID(iuo_current_explorer) THEN RETURN TRUE RETURN iuo_current_explorer.EVENT ke_canclose() end event event ke_closemodule();IF iuo_current_explorer.EVENT ke_explorer_closequery() <> CRet.FAILURE THEN iuo_sheets.of_CloseTab(iuo_sheets.of_GetSelectedIndex()) END IF IF ISVALID(itv) THEN IF NOT itv.Enabled THEN POST of_Lockcontrols(FALSE) END IF END IF end event event ke_maxtabsreached();MessageBox("Warning", "There are too many open modules. " + & "To conserve on memory, please close active modules.", & Exclamation!) end event event ke_tvselectionchanging;long ll_ret IF NOT ib_fromtabselection THEN //max tabs opened IF iuo_sheets.of_GetTabCount() >= iuo_sheets.#MaxTabs THEN EVENT ke_maxtabsreached() RETURN 1 END IF END IF ib_fromtabselection = FALSE IF ISVALID(iuo_current_explorer) THEN ll_ret = iuo_current_explorer.EVENT ke_explorer_selectionchanging() //must return 1 to prevent treeview selection IF ll_ret = CRet.FAILURE THEN ll_ret = 1 ELSE ll_ret = CRet.NO_ACTION END IF END IF RETURN ll_ret end event event ke_tvselectionchanged(readonly integer oldhandle, readonly integer newhandle);long ll_row u_explorer luo_x treeviewitem ltvi itv.GetItem(newhandle, ltvi) luo_x = of_Openmodule(newhandle) luo_x.EVENT ke_explorer_activate() //title string ls_title ls_title = luo_x.EVENT ke_overridetitle() IF ls_title = CString.EMPTY THEN ls_title = ltvi.Label END IF //strip edit long ll_pos ll_pos = POS(ls_title, " (*)") IF ll_pos > 0 THEN & ls_title = TRIM(MID(ls_title, 1, ll_pos)) IF ISVALID(iuo_title) THEN iuo_title.uo_gradient.of_SetText(ls_title) iuo_title.uo_gradient.of_SetIcon(ltvi.SelectedPictureIndex, FALSE) END IF //set active iuo_current_explorer = luo_x //toggle states boolean lb lb = EVENT ke_canclosemodule() //add to nav IF ISVALID(inv_nav) THEN inv_nav.of_SelectionChanged(oldhandle, newhandle) END IF //toolbar IF ISVALID(iuo_dwtoolbar) THEN iuo_dwtoolbar.of_ButtonEnable(BACK_BUTTON, inv_nav.of_getbackcount() > 0) iuo_dwtoolbar.of_ButtonEnable(FORWARD_BUTTON, inv_nav.of_getforwardcount() > 0) iuo_dwtoolbar.of_ButtonEnable(CLOSE_BUTTON, lb) END IF //check editmode long ll ll = of_GetObjectIndex(iuo_current_explorer) of_SetMode(iuo_current_explorer, istr_modules[ll].mode) //statusbar IF ISVALID(iuo_statusbar) THEN IF NOT iuo_current_explorer.EVENT ke_overridestatusbar(iuo_statusbar) THEN iuo_statusbar.of_SetLayout(1) iuo_statusbar.of_settext(1, iuo_current_explorer.EVENT ke_getstatustext()) END IF END IF //title IF ISVALID(iuo_title) THEN iuo_title.of_ShowX(lb) END IF end event event type integer ke_tabselectionchanging(readonly integer oldindex, readonly integer newindex);dragobject ldo integer li_index ldo = iuo_sheets.of_GetObject(newindex) li_index = of_GetObjectIndex(ldo) IF li_index > 0 THEN ib_fromtabselection = TRUE RETURN itv.SelectItem(istr_modules[li_index].itemhandle) END IF RETURN CRet.SUCCESS end event event type boolean ke_canclosetab(readonly integer ai_index);RETURN TRUE end event event ke_moduleopened(readonly string as_classname, readonly string as_title);//fired when module opened succesfully end event public subroutine of_uponefolder ();long ll_current, ll_parent IF NOT ISVALID(itv) THEN RETURN ll_current = itv.FindItem(CurrentTreeItem!, 0) IF ll_current > 0 THEN ll_parent = itv.FindItem(ParentTreeItem!, ll_current) IF ll_parent > 0 THEN itv.SelectItem(ll_parent) END IF end subroutine public subroutine of_showtreepane (readonly boolean ab_show);IF ISVALID(iuo_splitter) THEN IF ab_show THEN iuo_splitter.of_showsplitpart(0) ELSE iuo_splitter.of_showsplitpart(2) END IF END IF IF ISVALID(iuo_dwtoolbar) THEN & iuo_dwtoolbar.of_buttoncheck(FOLDER_BUTTON, ab_show) end subroutine public function integer of_getobjectindex (readonly dragobject ado);integer li_ret long ll_count, n li_ret = CRet.FAILURE ll_count = UPPERBOUND(istr_modules) FOR n = 1 to ll_count IF istr_modules[n].object = ado THEN li_ret = n EXIT END IF NEXT RETURN li_ret end function protected function integer of_getavailableindex ();long ll_count, n ll_count = UPPERBOUND(istr_modules) FOR n = 1 to ll_count IF NOT ISVALID(istr_modules[n].object) THEN RETURN n NEXT RETURN ll_count + 1 end function public function u_statusbar_explorer of_getexplorerstatusbar ();RETURN iuo_statusbar end function public function u_border_explorer of_getexplorertitle ();RETURN iuo_title end function public function u_tv_explorer of_getexplorertreeview ();RETURN itv end function public function u_dwtb_explorer of_getexplorertoolbar ();RETURN iuo_dwtoolbar end function public function u_sheets_explorer of_getexplorersheets ();RETURN iuo_sheets end function public function u_splitcontainer_explorer of_getexplorersplitter ();RETURN iuo_splitter end function public subroutine of_registertreeview (readonly u_tv_explorer atv);itv = atv IF ISVALID(itv) THEN itv.of_SetExplorer(this) end subroutine public subroutine of_registertitlebar (readonly u_border_explorer auo_titlebar);iuo_title = auo_titlebar IF ISVALID(iuo_title) THEN iuo_title.of_SetExplorer(this) //set imagelist n_svc_mgr lnv_svc n_svc_resource lnv_r lnv_svc.of_LoadSvc(lnv_r, CSvc.RESOURCE) iuo_title.of_SetHeaderImagelist( & lnv_r.of_GetStandardImagelist16(lnv_svc), 16) END IF end subroutine public subroutine of_registerstatusbar (readonly u_statusbar_explorer auo_statusbar);iuo_statusbar = auo_statusbar IF ISVALID(iuo_statusbar) THEN iuo_statusbar.of_SetExplorer(this) end subroutine public subroutine of_registersplitter (readonly u_splitcontainer_explorer auo_splitter);iuo_splitter = auo_splitter IF ISVALID(iuo_splitter) THEN iuo_splitter.of_SetExplorer(this) //toolbar? IF ISVALID(iuo_dwtoolbar) THEN iuo_dwtoolbar.of_ButtonCheck(FOLDER_BUTTON, iuo_splitter.#ShowPart = 0) END IF END IF end subroutine public subroutine of_registersheets (readonly u_sheets_explorer auo_sheets);iuo_sheets = auo_sheets IF ISVALID(iuo_sheets) THEN iuo_sheets.of_SetExplorer(this) end subroutine public subroutine of_registertoolbar (readonly u_dwtb_explorer auo_toolbar);iuo_dwtoolbar = auo_toolbar IF ISVALID(iuo_dwtoolbar) THEN iuo_dwtoolbar.of_SetExplorer(this) //we have a toolbar, create a navigator IF ISVALID(inv_nav) THEN DESTROY inv_nav inv_nav = CREATE n_explorer_navigator //set tv and maximum list inv_nav.of_Register(itv) inv_nav.of_SetMaxlist(#MaxList) END IF end subroutine public subroutine of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_dwtb_explorer auo_toolbar, readonly u_splitcontainer_explorer auo_splitter, readonly u_border_explorer auo_titlebar, readonly u_statusbar_explorer auo_statusbar);//register of_RegisterTreeview(atv) of_RegisterSheets(auo_sheets) of_RegisterToolbar(auo_toolbar) of_RegisterSplitter(auo_splitter) of_RegisterTitlebar(auo_titlebar) of_RegisterStatusbar(auo_statusbar) end subroutine public subroutine of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_dwtb_explorer auo_toolbar, readonly u_splitcontainer_explorer auo_splitter, readonly u_border_explorer auo_titlebar);//register of_RegisterTreeview(atv) of_RegisterSheets(auo_sheets) of_RegisterToolbar(auo_toolbar) of_RegisterSplitter(auo_splitter) of_RegisterTitlebar(auo_titlebar) end subroutine public subroutine of_lockcontrols (readonly boolean ab_lock);IF ISVALID(itv) THEN itv.Enabled = NOT ab_lock IF ISVALID(iuo_sheets) THEN iuo_sheets.of_locktab(ab_lock) end subroutine public function integer of_cleanup ();long ll_count, n IF EVENT ke_closeallmodules() = CRet.FAILURE THEN RETURN CRet.FAILURE //close folder tab iuo_sheets.of_CloseTab(1, FALSE) RETURN CRet.SUCCESS end function public function integer of_focuscurrentmodule ();IF ISVALID(iuo_current_explorer) THEN iuo_current_explorer.SetFocus() iuo_current_explorer.EVENT ke_explorer_gotfocus() RETURN CRet.SUCCESS ELSE RETURN CRet.FAILURE END IF end function public subroutine of_forceclose ();FORCE_CLOSE = TRUE end subroutine public function u_explorer of_openmodule (readonly long al_itemhandle);string ls_classname, ls_tabtext, ls_tvitext u_explorer luo_x long ll_count, n, ll_row boolean lb_exists, lb_static, lb_open treeviewitem ltvi long ll_node //get row from row id itv.GetItem(al_itemhandle, ltvi) ls_tvitext = ltvi.Label //bugfix for edit mode IF POS(ls_tvitext, " (*)") > 0 THEN ls_tvitext = MID(ls_tvitext, 1, LEN(ls_tvitext) - 4) END IF ll_row = ids_modules.GetRowFromRowID(LONG(ltvi.Data)) ls_classname = ids_modules.GetItemString(ll_row, "classname") ls_tabtext = ids_modules.GetItemString(ll_row, "tabtext") ll_node = ids_modules.GetItemNumber(ll_row, "node") ll_count = UPPERBOUND(istr_modules) //locate class and determine if static FOR n = 1 to ll_count IF istr_modules[n].classname = ls_classname THEN IF ISVALID(istr_modules[n].object) THEN lb_static = istr_modules[n].object.#StaticClass EXIT END IF END IF NEXT IF lb_static THEN FOR n = 1 to ll_count IF istr_modules[n].classname = ls_classname THEN lb_exists = TRUE EXIT END IF NEXT ELSE FOR n = 1 to ll_count IF istr_modules[n].displayname = ls_tvitext AND & istr_modules[n].classname = ls_classname THEN //is the object still valid? IF ISVALID(istr_modules[n].object) THEN lb_exists = TRUE EXIT END IF END IF NEXT END IF IF NOT lb_exists THEN SetPointer(Hourglass!) n = of_GetAvailableIndex() istr_modules[n].Displayname = ltvi.Label istr_modules[n].Classname = ls_classname IF ls_tabtext = CString.EMPTY OR ISNULL(ls_tabtext) THEN ls_tabtext = ltvi.Label END IF ClassDefinition lcd lcd = FindClassDefinition(ls_classname) IF ISVALID(iuo_statusbar) THEN & iuo_statusbar.of_Settext(1, "Opening module " + ls_tabtext + "...") IF ISNULL(lcd) OR NOT ISVALID(lcd) THEN istr_modules[n].object = iuo_sheets.of_Opentab(ls_tabtext, "u_explorer_invalid") ELSE istr_modules[n].object = iuo_sheets.of_Opentab(ls_tabtext, ls_classname) lb_open = TRUE END IF //register explorer and node istr_modules[n].object.of_register(this, ll_node) END IF //do not fire tab events iuo_sheets.of_SuspendEvents(TRUE) iuo_sheets.of_SelectTab(istr_modules[n].object) iuo_sheets.of_SuspendEvents(FALSE) //set the itemhandle istr_modules[n].itemhandle = ltvi.itemhandle //notify module opened IF lb_open THEN EVENT ke_moduleopened(ls_classname, ls_tabtext) END IF SetPointer(Arrow!) RETURN istr_modules[n].object end function public subroutine of_setmode (readonly u_explorer auo, readonly integer ai_mode);long ll_index long ll_pos ll_index = of_GetObjectIndex(auo) IF ll_index <= 0 THEN RETURN istr_modules[ll_index].mode = ai_mode //treeviewitem treeviewitem ltvi itv.GetItem(istr_modules[ll_index].itemhandle, ltvi) ltvi.Bold = ai_mode <> CMode.NORMAL //ltvi.Label = istr_modules[ll_index].displayname ll_pos = POS(ltvi.Label, " (*)") IF ai_mode <> CMode.NORMAL THEN IF ll_pos <= 0 THEN & ltvi.Label += " (*)" ELSE IF ll_pos > 0 THEN & ltvi.Label = TRIM(MID(ltvi.Label, 1, ll_pos)) END IF itv.SetItem(istr_modules[ll_index].itemhandle, ltvi) //if active object //IF ISVALID(iuo_current_explorer) THEN // IF iuo_current_explorer = istr_modules[ll_index].object THEN // Application.of_mode(ai_mode) // END IF //END IF end subroutine public subroutine of_setmodules (readonly n_ds ads);ads.of_clone(ids_modules) end subroutine public function integer of_populatemodules ();n_svc_tv lnv_tv n_svc_mgr lnv_svc IF NOT ISVALID(ids_modules) THEN RETURN CRet.FAILURE lnv_svc.of_LoadSvc(lnv_tv, CSvc.TV) lnv_tv.of_ConvertDatastore(lnv_svc, & ids_modules, & itv, & 0, & "parentnode", & "-1", & "node", & "displaytext", & "<#row_id#>", & "sortorder", & "pictureindex", & "selectedpictureindex", & CString.EMPTY, & "expanded") //select root item itv.SelectItem(1) RETURN CRet.SUCCESS end function public subroutine of_setmodules (readonly string ads);n_ds lds lds = CREATE n_ds lds.of_SetDataobject(ads) of_SetModules(lds) DESTROY lds end subroutine public subroutine of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets);//register of_RegisterTreeview(atv) of_RegisterSheets(auo_sheets) end subroutine public subroutine of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_splitcontainer_explorer auo_splitter);//register of_RegisterTreeview(atv) of_RegisterSheets(auo_sheets) of_RegisterSplitter(auo_splitter) end subroutine public function string of_getclassnamefromnode (readonly long nodeid);string ls_ret long ll ll = ids_modules.Find("node=" + STRING(nodeid), 1, ids_modules.RowCount()) IF ll > 0 THEN ls_ret = ids_modules.GetItemString(ll, "classname") END IF RETURN ls_ret end function public subroutine of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_dwtb_explorer auo_toolbar, readonly u_splitcontainer_explorer auo_splitter);//register of_RegisterTreeview(atv) of_RegisterSheets(auo_sheets) of_RegisterToolbar(auo_toolbar) of_RegisterSplitter(auo_splitter) end subroutine on n_explorer.create call super::create end on on n_explorer.destroy call super::destroy end on event destructor;call super::destructor;IF ISVALID(inv_nav) THEN DESTROY inv_nav end event event constructor;call super::constructor;n_svc_mgr lnv_svc n_svc_isempty lnv_check lnv_svc.of_LoadSvc(lnv_check, CSvc.ISEMPTY) IF NOT lnv_check.of_IsEmpty(#ModuleDatastore) THEN of_SetModules(#ModuleDatastore) END IF end event
- Sources
- Kodigo
- OpenExplorer
- n_explorer.sru
File: n_explorer.sru
Size: 20980
Date: Mon, 07 Apr 2008 21:32:49 +0200
Size: 20980
Date: Mon, 07 Apr 2008 21:32:49 +0200
- n_base n_explorer(sru)
- ke_canclosemodule() returns boolean
- ke_canclosetab(readonly integer ai_index) returns boolean
- ke_closeallmodules() returns integer
- ke_tabselectionchanging(readonly integer oldindex, readonly integer newindex) returns integer
- constructor
- destructor
- ke_closemodule()
- ke_maxtabsreached()
- ke_moduleopened(readonly string as_classname, readonly string as_title)
- ke_toolbar_buttonclicked(readonly string buttonid, readonly string buttontext, readonly string buttondata)
- ke_toolbar_dropdown(readonly string buttonid, readonly string buttontext, readonly string buttondata, readonly integer popx, readonly integer popy)
- ke_tvselectionchanged(readonly integer oldhandle, readonly integer newhandle)
- ke_tvselectionchanging
- of_cleanup () returns integer
- of_focuscurrentmodule () returns integer
- of_forceclose ()
- of_getavailableindex () returns integer
- of_getclassnamefromnode (readonly long nodeid) returns string
- of_getexplorersheets () returns u_sheets_explorer
- of_getexplorersplitter () returns u_splitcontainer_explorer
- of_getexplorerstatusbar () returns u_statusbar_explorer
- of_getexplorertitle () returns u_border_explorer
- of_getexplorertoolbar () returns u_dwtb_explorer
- of_getexplorertreeview () returns u_tv_explorer
- of_getobjectindex (readonly dragobject ado) returns integer
- of_lockcontrols (readonly boolean ab_lock)
- of_openmodule (readonly long al_itemhandle) returns u_explorer
- of_populatemodules () returns integer
- of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets)
- of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_dwtb_explorer auo_toolbar, readonly u_splitcontainer_explorer auo_splitter)
- of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_dwtb_explorer auo_toolbar, readonly u_splitcontainer_explorer auo_splitter, readonly u_border_explorer auo_titlebar)
- of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_dwtb_explorer auo_toolbar, readonly u_splitcontainer_explorer auo_splitter, readonly u_border_explorer auo_titlebar, readonly u_statusbar_explorer auo_statusbar)
- of_register (readonly u_tv_explorer atv, readonly u_sheets_explorer auo_sheets, readonly u_splitcontainer_explorer auo_splitter)
- of_registersheets (readonly u_sheets_explorer auo_sheets)
- of_registersplitter (readonly u_splitcontainer_explorer auo_splitter)
- of_registerstatusbar (readonly u_statusbar_explorer auo_statusbar)
- of_registertitlebar (readonly u_border_explorer auo_titlebar)
- of_registertoolbar (readonly u_dwtb_explorer auo_toolbar)
- of_registertreeview (readonly u_tv_explorer atv)
- of_setmode (readonly u_explorer auo, readonly integer ai_mode)
- of_setmodules (readonly n_ds ads)
- of_setmodules (readonly string ads)
- of_showtreepane (readonly boolean ab_show)
- of_uponefolder ()