PBMiner

$PBExportHeader$u_border_explorer.sru
$PBExportComments$Explorer Border/Titlebar
forward
global type u_border_explorer from u_borderpanel
end type
end forward

global type u_border_explorer from u_borderpanel
boolean #showheader = true
boolean #usetheme = true
end type
global u_border_explorer u_border_explorer

type variables
Protected:

n_explorer inv_explorer
end variables

forward prototypes
public subroutine of_setexplorer (n_explorer anv_explorer)
end prototypes

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

on u_border_explorer.create
int iCurrent
call super::create
end on

on u_border_explorer.destroy
call super::destroy
end on

event ke_xclicked;call super::ke_xclicked;IF ISVALID(inv_explorer) THEN inv_explorer.EVENT ke_closemodule()
end event

type uo_gradient from u_borderpanel`uo_gradient within u_border_explorer
end type

type st_1 from u_borderpanel`st_1 within u_border_explorer
end type