w_add.srw

pb所需编程技巧和事例

integer width = 512
integer height = 84
integer taborder = 80
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
string text = "1900年01月01日"
borderstyle borderstyle = stylelowered!
maskdatatype maskdatatype = datetimemask!
string mask = "yyyy年mm月dd日"
end type

type em_start_time from editmask within w_add
integer x = 361
integer y = 500
integer width = 512
integer height = 84
integer taborder = 70
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
string text = "1900年01月01日"
borderstyle borderstyle = stylelowered!
maskdatatype maskdatatype = datetimemask!
string mask = "yyyy年mm月dd日"
end type

type mle_note from multilineedit within w_add
integer x = 361
integer y = 1648
integer width = 1920
integer height = 320
integer taborder = 160
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean hscrollbar = true
boolean vscrollbar = true
borderstyle borderstyle = stylelowered!
end type

type st_21 from statictext within w_add
integer x = 46
integer y = 1652
integer width = 224
integer height = 64
integer textsize = -10
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_20 from statictext within w_add
integer x = 1033
integer y = 620
integer width = 320
integer height = 64
integer textsize = -10
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_19 from statictext within w_add
integer x = 46
integer y = 624
integer width = 302
integer height = 64
integer textsize = -10
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_17 from statictext within w_add
integer x = 1989
integer y = 740
integer width = 224
integer height = 64
integer textsize = -10
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_16 from statictext within w_add
integer x = 1033
integer y = 740
integer width = 306
integer height = 64
integer textsize = -10
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 w_add
integer x = 46
integer y = 740
integer width = 320
integer height = 64
integer textsize = -10
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_url from singlelineedit within w_add
integer x = 361
integer y = 960
integer width = 1911
integer height = 84
integer taborder = 90
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
end type

type st_14 from statictext within w_add
integer x = 46
integer y = 972
integer width = 293
integer height = 64
integer textsize = -10
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_13 from statictext within w_add
integer x = 1033
integer y = 500
integer width = 334
integer height = 64
integer textsize = -10
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_12 from statictext within w_add
integer x = 46
integer y = 504
integer width = 311
integer height = 64
integer textsize = -10
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 mle_description from multilineedit within w_add
integer x = 361
integer y = 1348
integer width = 1915
integer height = 272
integer taborder = 60
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean hscrollbar = true
boolean vscrollbar = true
borderstyle borderstyle = stylelowered!
end type

type mle_keyword from multilineedit within w_add
integer x = 361
integer y = 1080
integer width = 1915
integer height = 248
integer taborder = 70
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
boolean hscrollbar = true
boolean vscrollbar = true
borderstyle borderstyle = stylelowered!
end type

type st_11 from statictext within w_add
integer x = 46
integer y = 1364
integer width = 219
integer height = 64
integer textsize = -10
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_picture from singlelineedit within w_add
integer x = 361
integer y = 852
integer width = 1915
integer height = 80
integer taborder = 70
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
end type

type st_10 from statictext within w_add
integer x = 46
integer y = 852
integer width = 210
integer height = 64
integer textsize = -10
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_9 from statictext within w_add
integer x = 46
integer y = 1088
integer width = 242
integer height = 64
integer textsize = -10
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_model from singlelineedit within w_add
integer x = 361
integer y = 384
integer width = 1874
integer height = 76
integer taborder = 50
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
end type

type st_8 from statictext within w_add
integer x = 55
integer y = 376
integer width = 187
integer height = 72
integer textsize = -10
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_brand from singlelineedit within w_add
integer x = 361
integer y = 272
integer width = 1870
integer height = 76
integer taborder = 40
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
end type

type st_6 from statictext within w_add
integer x = 55
integer y = 276
integer width = 178
integer height = 64
integer textsize = -10
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_merchant_id from singlelineedit within w_add
integer x = 1934
integer y = 168
integer width = 293
integer height = 80
integer taborder = 30
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
end type

type sle_keyfilter from singlelineedit within w_add
integer x = 1531
integer y = 52
integer width = 402
integer height = 84
integer taborder = 20
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
end type

type cb_1 from commandbutton within w_add
integer x = 2002
integer y = 52
integer width = 201
integer height = 76
integer taborder = 20
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
string text = "过滤"
end type

event clicked;string keyfilter,filterstring
keyfilter=trim(sle_keyfilter.text)
if keyfilter<>'' then
  filterstring="merchant_type_id="+string(mtid)+" and merchant_name like '%'+'"+keyfilter+"'+'%'"
  dw_1.settransobject(sqlca)
  dw_1.setfilter(filterstring)
  dw_1.filter()
  dw_1.retrieve()
end if
end event

type st_5 from statictext within w_add
integer x = 1152
integer y = 52
integer width = 379
integer height = 64
integer textsize = -10
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 dw_1 from datawindow within w_add
integer x = 2249
integer y = 16
integer width = 914
integer height = 512
integer taborder = 30
boolean titlebar = true
string title = "选中名称，获得商家ID"
string dataobject = "d_merchantid"
boolean hscrollbar = true
boolean vscrollbar = true
boolean resizable = true
borderstyle borderstyle = stylelowered!
end type

event rowfocuschanged;if currentrow <= dw_1.rowcount() then	
	sle_merchant_id.text=string(dw_1.GetItemNumber(currentrow,"merchant_id"))	
end if
end event

type st_4 from statictext within w_add
integer x = 1710
integer y = 168
integer width = 210
integer height = 72
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
long backcolor = 67108864
string text = "商家ID"
boolean focusrectangle = false
end type

type st_3 from statictext within w_add
integer x = 55
integer y = 168
integer width = 306
integer height = 72
integer textsize = -10
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_product_type from singlelineedit within w_add
integer x = 361
integer y = 168
integer width = 457
integer height = 80
integer taborder = 20
integer textsize = -10
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_tablename from singlelineedit within w_add
integer x = 361
integer y = 52
integer width = 695
integer height = 84
integer taborder = 10
integer textsize = -10
integer weight = 400
fontcharset fontcharset = ansi!
fontpitch fontpitch = variable!
fontfamily fontfamily = swiss!
string facename = "Arial"
long textcolor = 33554432
borderstyle borderstyle = stylelowered!
end type

type st_1 from statictext within w_add
integer x = 55
integer y = 52
integer width = 366
integer height = 72
integer textsize = -10
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