w_main.srw

pb所需编程技巧和事例

type sle_officetel from singlelineedit within tabpage_1
integer x = 654
integer y = 1220
integer width = 434
integer height = 96
integer taborder = 60
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type st_16 from statictext within tabpage_1
integer x = 174
integer y = 1220
integer width = 379
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "办公室电话"
boolean focusrectangle = false
end type

type st_15 from statictext within tabpage_1
integer x = 174
integer y = 688
integer width = 334
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "干事/科员"
boolean focusrectangle = false
end type

type st_14 from statictext within tabpage_1
integer x = 174
integer y = 352
integer width = 448
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "副(主任/部长)"
boolean focusrectangle = false
end type

type sle_director from singlelineedit within tabpage_1
integer x = 654
integer y = 200
integer width = 425
integer height = 96
integer taborder = 40
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type st_13 from statictext within tabpage_1
integer x = 174
integer y = 204
integer width = 411
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "主任/部长："
boolean focusrectangle = false
end type

type tabpage_2 from userobject within tab_1
integer x = 18
integer y = 120
integer width = 1778
integer height = 1676
long backcolor = 67108864
string text = "干部信息"
long tabtextcolor = 33554432
long picturemaskcolor = 536870912
cb_modipersonel cb_modipersonel
mle_resume mle_resume
sle_email sle_email
st_11 st_11
sle_mobile sle_mobile
st_10 st_10
sle_position sle_position
st_9 st_9
st_8 st_8
st_7 st_7
st_6 st_6
sle_degree sle_degree
sle_tel sle_tel
sle_department sle_department
sle_birthday sle_birthday
st_5 st_5
st_4 st_4
st_3 st_3
st_2 st_2
sle_politicalstatus sle_politicalstatus
sle_native sle_native
sle_gender sle_gender
sle_name sle_name
st_1 st_1
end type

on tabpage_2.create
this.cb_modipersonel=create cb_modipersonel
this.mle_resume=create mle_resume
this.sle_email=create sle_email
this.st_11=create st_11
this.sle_mobile=create sle_mobile
this.st_10=create st_10
this.sle_position=create sle_position
this.st_9=create st_9
this.st_8=create st_8
this.st_7=create st_7
this.st_6=create st_6
this.sle_degree=create sle_degree
this.sle_tel=create sle_tel
this.sle_department=create sle_department
this.sle_birthday=create sle_birthday
this.st_5=create st_5
this.st_4=create st_4
this.st_3=create st_3
this.st_2=create st_2
this.sle_politicalstatus=create sle_politicalstatus
this.sle_native=create sle_native
this.sle_gender=create sle_gender
this.sle_name=create sle_name
this.st_1=create st_1
this.Control[]={this.cb_modipersonel,&
this.mle_resume,&
this.sle_email,&
this.st_11,&
this.sle_mobile,&
this.st_10,&
this.sle_position,&
this.st_9,&
this.st_8,&
this.st_7,&
this.st_6,&
this.sle_degree,&
this.sle_tel,&
this.sle_department,&
this.sle_birthday,&
this.st_5,&
this.st_4,&
this.st_3,&
this.st_2,&
this.sle_politicalstatus,&
this.sle_native,&
this.sle_gender,&
this.sle_name,&
this.st_1}
end on

on tabpage_2.destroy
destroy(this.cb_modipersonel)
destroy(this.mle_resume)
destroy(this.sle_email)
destroy(this.st_11)
destroy(this.sle_mobile)
destroy(this.st_10)
destroy(this.sle_position)
destroy(this.st_9)
destroy(this.st_8)
destroy(this.st_7)
destroy(this.st_6)
destroy(this.sle_degree)
destroy(this.sle_tel)
destroy(this.sle_department)
destroy(this.sle_birthday)
destroy(this.st_5)
destroy(this.st_4)
destroy(this.st_3)
destroy(this.st_2)
destroy(this.sle_politicalstatus)
destroy(this.sle_native)
destroy(this.sle_gender)
destroy(this.sle_name)
destroy(this.st_1)
end on

type cb_modipersonel from commandbutton within tabpage_2
integer x = 567
integer y = 1448
integer width = 503
integer height = 128
integer taborder = 80
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
string text = "人员信息维护"
end type

event clicked;open(w_person)
end event

type mle_resume from multilineedit within tabpage_2
integer x = 32
integer y = 948
integer width = 1605
integer height = 452
integer taborder = 100
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean autohscroll = true
boolean autovscroll = true
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type sle_email from singlelineedit within tabpage_2
integer x = 283
integer y = 748
integer width = 1271
integer height = 96
integer taborder = 90
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type st_11 from statictext within tabpage_2
integer x = 23
integer y = 752
integer width = 270
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "Email："
boolean focusrectangle = false
end type

type sle_mobile from singlelineedit within tabpage_2
integer x = 1129
integer y = 624
integer width = 553
integer height = 96
integer taborder = 80
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type st_10 from statictext within tabpage_2
integer x = 791
integer y = 624
integer width = 306
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "移动电话"
boolean focusrectangle = false
end type

type sle_position from singlelineedit within tabpage_2
integer x = 247
integer y = 472
integer width = 421
integer height = 96
integer taborder = 90
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type st_9 from statictext within tabpage_2
integer x = 23
integer y = 340
integer width = 183
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "生日"
boolean focusrectangle = false
end type

type st_8 from statictext within tabpage_2
integer x = 791
integer y = 476
integer width = 306
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "文化程度"
boolean focusrectangle = false
end type

type st_7 from statictext within tabpage_2
integer x = 23
integer y = 616
integer width = 183
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "电话"
boolean focusrectangle = false
end type

type st_6 from statictext within tabpage_2
integer x = 791
integer y = 332
integer width = 306
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "所在部门"
boolean focusrectangle = false
end type

type sle_degree from singlelineedit within tabpage_2
integer x = 1129
integer y = 476
integer width = 421
integer height = 96
integer taborder = 80
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type sle_tel from singlelineedit within tabpage_2
integer x = 247
integer y = 616
integer width = 421
integer height = 96
integer taborder = 70
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type sle_department from singlelineedit within tabpage_2
integer x = 1129
integer y = 332
integer width = 421
integer height = 96
integer taborder = 60
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type sle_birthday from singlelineedit within tabpage_2
integer x = 247
integer y = 332
integer width = 421
integer height = 96
integer taborder = 50
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type st_5 from statictext within tabpage_2
integer x = 23
integer y = 480
integer width = 197
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "职务"
boolean focusrectangle = false
end type

type st_4 from statictext within tabpage_2
integer x = 791
integer y = 200
integer width = 306
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "政治面貌"
boolean focusrectangle = false
end type

type st_3 from statictext within tabpage_2
integer x = 23
integer y = 200
integer width = 165
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "民族"
boolean focusrectangle = false
end type

type st_2 from statictext within tabpage_2
integer x = 791
integer y = 68
integer width = 197
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "性别"
boolean focusrectangle = false
end type

type sle_politicalstatus from singlelineedit within tabpage_2
integer x = 1129
integer y = 200
integer width = 421
integer height = 96
integer taborder = 40
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type sle_native from singlelineedit within tabpage_2
integer x = 247
integer y = 200
integer width = 421
integer height = 96
integer taborder = 30
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type sle_gender from singlelineedit within tabpage_2
integer x = 1129
integer y = 68
integer width = 421
integer height = 96
integer taborder = 20
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type sle_name from singlelineedit within tabpage_2
integer x = 247
integer y = 68
integer width = 421
integer height = 96
integer taborder = 20
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean displayonly = true
borderstyle borderstyle = stylelowered!
end type

type st_1 from statictext within tabpage_2
integer x = 23
integer y = 68
integer width = 197
integer height = 72
integer textsize = -12
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "姓名"
boolean focusrectangle = false
end type