PBMiner

$PBExportHeader$u_wizard97_interior.sru
$PBExportComments$MS wizard 97 page spec
forward
global type u_wizard97_interior from u_wizard_page
end type
type st_divide from u_st within u_wizard97_interior
end type
type p_1 from u_p within u_wizard97_interior
end type
type st_inner from u_st within u_wizard97_interior
end type
type st_outer from u_st within u_wizard97_interior
end type
type st_description from u_st within u_wizard97_interior
end type
type st_title from u_st within u_wizard97_interior
end type
type st_1 from u_st within u_wizard97_interior
end type
end forward

global type u_wizard97_interior from u_wizard_page
st_divide st_divide
p_1 p_1
st_inner st_inner
st_outer st_outer
st_description st_description
st_title st_title
st_1 st_1
end type
global u_wizard97_interior u_wizard97_interior

type variables
Protected:
boolean #ShowImage
end variables
forward prototypes
public subroutine of_showimage (readonly boolean ab_show)
end prototypes

public subroutine of_showimage (readonly boolean ab_show);#ShowImage = ab_show
st_outer.Visible = ab_show
st_inner.Visible = ab_show
p_1.Visible = ab_show
end subroutine

on u_wizard97_interior.create
int iCurrent
call super::create
this.st_divide=create st_divide
this.p_1=create p_1
this.st_inner=create st_inner
this.st_outer=create st_outer
this.st_description=create st_description
this.st_title=create st_title
this.st_1=create st_1
iCurrent=UpperBound(this.Control)
this.Control[iCurrent+1]=this.st_divide
this.Control[iCurrent+2]=this.p_1
this.Control[iCurrent+3]=this.st_inner
this.Control[iCurrent+4]=this.st_outer
this.Control[iCurrent+5]=this.st_description
this.Control[iCurrent+6]=this.st_title
this.Control[iCurrent+7]=this.st_1
end on

on u_wizard97_interior.destroy
call super::destroy
destroy(this.st_divide)
destroy(this.p_1)
destroy(this.st_inner)
destroy(this.st_outer)
destroy(this.st_description)
destroy(this.st_title)
destroy(this.st_1)
end on

event ke_preopen;call super::ke_preopen;of_Showimage(#ShowImage)
end event

type st_divide from u_st within u_wizard97_interior
integer y = 240
integer width = 2299
integer height = 4
string text = ""
boolean border = true
boolean #usethemebordercolor = true
long #sizeorder = 1
boolean #dock = true
long #docktype = 1
string #dock_control_top = "st_1"
end type

type p_1 from u_p within u_wizard97_interior
integer x = 2066
integer y = 64
integer width = 110
integer height = 96
boolean bringtotop = true
boolean #anchorright = true
end type

type st_inner from u_st within u_wizard97_interior
integer x = 2030
integer y = 44
integer width = 178
integer height = 148
long backcolor = 16777215
string text = ""
boolean #anchorright = true
end type

type st_outer from u_st within u_wizard97_interior
integer x = 2011
integer y = 32
integer width = 215
integer height = 176
long backcolor = 134217730
string text = ""
boolean #anchorright = true
end type

type st_description from u_st within u_wizard97_interior
integer x = 192
integer y = 96
integer width = 1655
integer height = 140
long backcolor = 16777215
string text = "<Page Description Here>"
boolean #anchorleft = true
boolean #anchorright = true
end type

type st_title from u_st within u_wizard97_interior
integer x = 110
integer y = 40
integer width = 1851
integer weight = 700
long backcolor = 16777215
string text = "<Page Title Here>"
boolean #anchorleft = true
boolean #anchorright = true
end type

type st_1 from u_st within u_wizard97_interior
integer width = 2286
integer height = 240
long backcolor = 16777215
string text = ""
boolean #dock = true
long #docktype = 1
end type