$PBExportHeader$w_rpt_statbar.srw $PBExportComments$自定义状态条--窗口 forward global type w_rpt_statbar from window end type type dw1 from datawindow within w_rpt_statbar end type end forward global type w_rpt_statbar from window integer x = 1056 integer y = 484 integer width = 2784 integer height = 72 boolean border = false windowtype windowtype = popup! long backcolor = 80269524 dw1 dw1 end type global w_rpt_statbar w_rpt_statbar type variables window iw end variables on w_rpt_statbar.create this.dw1=create dw1 this.Control[]={this.dw1} end on on w_rpt_statbar.destroy destroy(this.dw1) end on event resize;x=iw.x+16 y=iw.y + 300 +iw.height -height - 16 width=iw.width -32 dw1.width=width -4 end event event open;iw=parentwindow() dw1.insertrow(0) end event type dw1 from datawindow within w_rpt_statbar integer width = 2523 integer height = 72 integer taborder = 10 string dataobject = "dw_rpt_statbar" boolean border = false boolean livescroll = true end type