File: u_tab_rapimain.sru
Size: 2416
Date: Tue, 22 Aug 2017 17:30:58 +0200
$PBExportHeader$u_tab_rapimain.sru
forward
global type u_tab_rapimain from u_base_tab
end type
type tabpage_systeminfo from u_tabpage_systeminfo within u_tab_rapimain
end type
type tabpage_systeminfo from u_tabpage_systeminfo within u_tab_rapimain
end type
type tabpage_filesystem from u_tabpage_filesystem within u_tab_rapimain
end type
type tabpage_filesystem from u_tabpage_filesystem within u_tab_rapimain
end type
type tabpage_directories from u_tabpage_directories within u_tab_rapimain
end type
type tabpage_directories from u_tabpage_directories within u_tab_rapimain
end type
type tabpage_registry from u_tabpage_registry within u_tab_rapimain
end type
type tabpage_registry from u_tabpage_registry within u_tab_rapimain
end type
end forward

global type u_tab_rapimain from u_base_tab
integer width = 2149
integer height = 1296
tabpage_systeminfo tabpage_systeminfo
tabpage_filesystem tabpage_filesystem
tabpage_directories tabpage_directories
tabpage_registry tabpage_registry
end type
global u_tab_rapimain u_tab_rapimain

on u_tab_rapimain.create
this.tabpage_systeminfo=create tabpage_systeminfo
this.tabpage_filesystem=create tabpage_filesystem
this.tabpage_directories=create tabpage_directories
this.tabpage_registry=create tabpage_registry
int iCurrent
call super::create
iCurrent=UpperBound(this.Control)
this.Control[iCurrent+1]=this.tabpage_systeminfo
this.Control[iCurrent+2]=this.tabpage_filesystem
this.Control[iCurrent+3]=this.tabpage_directories
this.Control[iCurrent+4]=this.tabpage_registry
end on

on u_tab_rapimain.destroy
call super::destroy
destroy(this.tabpage_systeminfo)
destroy(this.tabpage_filesystem)
destroy(this.tabpage_directories)
destroy(this.tabpage_registry)
end on

type tabpage_systeminfo from u_tabpage_systeminfo within u_tab_rapimain
integer x = 18
integer y = 104
integer width = 2112
integer height = 1176
end type

type tabpage_filesystem from u_tabpage_filesystem within u_tab_rapimain
integer x = 18
integer y = 104
integer width = 2112
integer height = 1176
end type

type tabpage_directories from u_tabpage_directories within u_tab_rapimain
integer x = 18
integer y = 104
integer width = 2112
integer height = 1176
end type

type tabpage_registry from u_tabpage_registry within u_tab_rapimain
integer x = 18
integer y = 104
integer width = 2112
integer height = 1176
end type