pb组合查询

forward
global type w_condition_query_template from w_base
end type
type dw_query from datawindow within w_condition_query_template
end type
type cb_print from commandbutton within w_condition_query_template
end type
type cb_all from commandbutton within w_condition_query_template
end type
type cb_ok from commandbutton within w_condition_query_template
end type
type cb_clear from commandbutton within w_condition_query_template
end type
type cb_ins from commandbutton within w_condition_query_template
end type
type cb_del from commandbutton within w_condition_query_template
end type
type cb_exit from commandbutton within w_condition_query_template
end type
type cb_add from commandbutton within w_condition_query_template
end type
type dw_query_condition from datawindow within w_condition_query_template
end type
end forward

global type w_condition_query_template from w_base
integer width = 3424
integer height = 1624
dw_query dw_query
cb_print cb_print
cb_all cb_all
cb_ok cb_ok
cb_clear cb_clear
cb_ins cb_ins
cb_del cb_del
cb_exit cb_exit
cb_add cb_add
dw_query_condition dw_query_condition
end type
global w_condition_query_template w_condition_query_template

on w_condition_query_template.create
int iCurrent
call super::create
this.dw_query=create dw_query
this.cb_print=create cb_print
this.cb_all=create cb_all
this.cb_ok=create cb_ok
this.cb_clear=create cb_clear
this.cb_ins=create cb_ins
this.cb_del=create cb_del
this.cb_exit=create cb_exit
this.cb_add=create cb_add
this.dw_query_condition=create dw_query_condition
iCurrent=UpperBound(this.Control)
this.Control[iCurrent+1]=this.dw_query
this.Control[iCurrent+2]=this.cb_print
this.Control[iCurrent+3]=this.cb_all
this.Control[iCurrent+4]=this.cb_ok
this.Control[iCurrent+5]=this.cb_clear
this.Control[iCurrent+6]=this.cb_ins
this.Control[iCurrent+7]=this.cb_del
this.Control[iCurrent+8]=this.cb_exit
this.Control[iCurrent+9]=this.cb_add
this.Control[iCurrent+10]=this.dw_query_condition
end on

on w_condition_query_template.destroy
call super::destroy
destroy(this.dw_query)
destroy(this.cb_print)
destroy(this.cb_all)
destroy(this.cb_ok)
destroy(this.cb_clear)
destroy(this.cb_ins)
destroy(this.cb_del)
destroy(this.cb_exit)
destroy(this.cb_add)
destroy(this.dw_query_condition)
end on

type dw_query from datawindow within w_condition_query_template
integer x = 55
integer y = 592
integer width = 2423
integer height = 908
integer taborder = 30
string title = "none"
boolean livescroll = true
borderstyle borderstyle = stylelowered!
end type