PBMiner

$PBExportHeader$u_tv_explorer.sru
$PBExportComments$Explorer treeview
forward
global type u_tv_explorer from u_tv
end type
end forward

global type u_tv_explorer from u_tv
boolean trackselect = true
boolean #standardimages = true
end type
global u_tv_explorer u_tv_explorer

type variables
Protected:

n_explorer inv_explorer
end variables

forward prototypes
public subroutine of_setexplorer (readonly n_explorer anv_explorer)
end prototypes

public subroutine of_setexplorer (readonly n_explorer anv_explorer);inv_explorer = anv_explorer
end subroutine

on u_tv_explorer.create
call super::create
end on

on u_tv_explorer.destroy
call super::destroy
end on

event selectionchanged;call super::selectionchanged;IF ISVALID(inv_explorer) THEN
   inv_explorer.EVENT ke_tvselectionchanged(oldhandle, newhandle)
END IF
end event

event selectionchanging;call super::selectionchanging;IF ISVALID(inv_explorer) THEN
   RETURN inv_explorer.EVENT ke_tvselectionchanging(oldhandle, newhandle)
END IF
end event