w_jcmain.srw

某 房 产 公 司 售 楼 管 理 系 统

$PBExportHeader$w_jcmain.srw
$PBExportComments$主窗口
forward
global type w_jcmain from window
end type
type sle_2 from singlelineedit within w_jcmain
end type
type sle_3 from singlelineedit within w_jcmain
end type
type p_1 from picture within w_jcmain
end type
type cb_10 from commandbutton within w_jcmain
end type
type cb_1 from commandbutton within w_jcmain
end type
type cb_2 from commandbutton within w_jcmain
end type
type cb_exit from commandbutton within w_jcmain
end type
type cb_change from commandbutton within w_jcmain
end type
type dw_5 from datawindow within w_jcmain
end type
type dw_4 from datawindow within w_jcmain
end type
type dw_3 from datawindow within w_jcmain
end type
type tab_1 from tab within w_jcmain
end type
type tabpage_1 from userobject within tab_1
end type
type st_1 from statictext within tabpage_1
end type
type st_2 from statictext within tabpage_1
end type
type p_clzp from picture within tabpage_1
end type
type p_czzp from picture within tabpage_1
end type
type dw_1 from datawindow within tabpage_1
end type
type p_3 from picture within tabpage_1
end type
type tabpage_1 from userobject within tab_1
st_1 st_1
st_2 st_2
p_clzp p_clzp
p_czzp p_czzp
dw_1 dw_1
p_3 p_3
end type
type tabpage_2 from userobject within tab_1
end type
type st_5 from statictext within tabpage_2
end type
type p_cwy from picture within tabpage_2
end type
type p_jsy2 from picture within tabpage_2
end type
type st_4 from statictext within tabpage_2
end type
type p_jsy1 from picture within tabpage_2
end type
type st_3 from statictext within tabpage_2
end type
type dw_2 from datawindow within tabpage_2
end type
type p_4 from picture within tabpage_2
end type
type tabpage_2 from userobject within tab_1
st_5 st_5
p_cwy p_cwy
p_jsy2 p_jsy2
st_4 st_4
p_jsy1 p_jsy1
st_3 st_3
dw_2 dw_2
p_4 p_4
end type
type tabpage_5 from userobject within tab_1
end type
type dw_10 from datawindow within tabpage_5
end type
type p_2 from picture within tabpage_5
end type
type st_10 from statictext within tabpage_5
end type
type sle_1 from singlelineedit within tabpage_5
end type
type st_11 from statictext within tabpage_5
end type
type cb_6 from commandbutton within tabpage_5
end type
type cb_5 from commandbutton within tabpage_5
end type
type cb_4 from commandbutton within tabpage_5
end type
type ddlb_4 from dropdownlistbox within tabpage_5
end type
type st_12 from statictext within tabpage_5
end type
type ddlb_3 from dropdownlistbox within tabpage_5
end type
type cb_3 from commandbutton within tabpage_5
end type
type em_1 from editmask within tabpage_5
end type
type ddlb_2 from dropdownlistbox within tabpage_5
end type
type st_9 from statictext within tabpage_5
end type
type st_8 from statictext within tabpage_5
end type
type st_7 from statictext within tabpage_5
end type
type st_6 from statictext within tabpage_5
end type
type ddlb_1 from dropdownlistbox within tabpage_5
end type
type ln_1 from line within tabpage_5
end type
type ln_3 from line within tabpage_5
end type
type tabpage_5 from userobject within tab_1
dw_10 dw_10
p_2 p_2
st_10 st_10
sle_1 sle_1
st_11 st_11
cb_6 cb_6
cb_5 cb_5
cb_4 cb_4
ddlb_4 ddlb_4
st_12 st_12
ddlb_3 ddlb_3
cb_3 cb_3
em_1 em_1
ddlb_2 ddlb_2
st_9 st_9
st_8 st_8
st_7 st_7
st_6 st_6
ddlb_1 ddlb_1
ln_1 ln_1
ln_3 ln_3
end type
type tabpage_6 from userobject within tab_1
end type
type st_16 from statictext within tabpage_6
end type
type st_15 from statictext within tabpage_6
end type
type st_14 from statictext within tabpage_6
end type
type lb_1 from listbox within tabpage_6
end type
type lb_2 from listbox within tabpage_6
end type
type gr_1 from graph within tabpage_6
end type
type p_5 from picture within tabpage_6
end type
type dw_6 from datawindow within tabpage_6
end type
type ddlb_5 from dropdownlistbox within tabpage_6
end type
type st_13 from statictext within tabpage_6
end type
type cb_7 from commandbutton within tabpage_6
end type
type tabpage_6 from userobject within tab_1
st_16 st_16
st_15 st_15
st_14 st_14
lb_1 lb_1
lb_2 lb_2
gr_1 gr_1
p_5 p_5
dw_6 dw_6
ddlb_5 ddlb_5
st_13 st_13
cb_7 cb_7
end type
type tab_1 from tab within w_jcmain
tabpage_1 tabpage_1
tabpage_2 tabpage_2
tabpage_5 tabpage_5
tabpage_6 tabpage_6
end type
end forward

global type w_jcmain from window
integer x = 18
integer y = 20
integer width = 3625
integer height = 2380
boolean titlebar = true
string title = "客运长途汽车治安稽查"
boolean controlmenu = true
boolean minbox = true
boolean resizable = true
windowtype windowtype = popup!
long backcolor = 79741120
string icon = "C:\zak\Tcsl.ico"
sle_2 sle_2
sle_3 sle_3
p_1 p_1
cb_10 cb_10
cb_1 cb_1
cb_2 cb_2
cb_exit cb_exit
cb_change cb_change
dw_5 dw_5
dw_4 dw_4
dw_3 dw_3
tab_1 tab_1
end type
global w_jcmain w_jcmain

type variables
string str_cph
end variables

on w_jcmain.create
this.sle_2=create sle_2
this.sle_3=create sle_3
this.p_1=create p_1
this.cb_10=create cb_10
this.cb_1=create cb_1
this.cb_2=create cb_2
this.cb_exit=create cb_exit
this.cb_change=create cb_change
this.dw_5=create dw_5
this.dw_4=create dw_4
this.dw_3=create dw_3
this.tab_1=create tab_1
this.Control[]={this.sle_2,&
this.sle_3,&
this.p_1,&
this.cb_10,&
this.cb_1,&
this.cb_2,&
this.cb_exit,&
this.cb_change,&
this.dw_5,&
this.dw_4,&
this.dw_3,&
this.tab_1}
end on

on w_jcmain.destroy
destroy(this.sle_2)
destroy(this.sle_3)
destroy(this.p_1)
destroy(this.cb_10)
destroy(this.cb_1)
destroy(this.cb_2)
destroy(this.cb_exit)
destroy(this.cb_change)
destroy(this.dw_5)
destroy(this.dw_4)
destroy(this.dw_3)
destroy(this.tab_1)
end on

event open;// position the window in the center of the screen, Return: Boolean