Q5/ws_objects/Ew_mainface.pbl.src/w_sysplan_dw_edit.srw

$PBExportHeader$w_sysplan_dw_edit.srw
forward
global type w_sysplan_dw_edit from w_publ_base
end type
type cb_1 from uo_imflatbutton within w_sysplan_dw_edit
end type
type cb_2 from uo_imflatbutton within w_sysplan_dw_edit
end type
type cb_3 from uo_imflatbutton within w_sysplan_dw_edit
end type
type cb_5 from uo_imflatbutton within w_sysplan_dw_edit
end type
type dw_1 from u_dw_rbtnfilter within w_sysplan_dw_edit
end type
type r_bar from rectangle within w_sysplan_dw_edit
end type
type ln_bar from line within w_sysplan_dw_edit
end type
type ln_bar2 from line within w_sysplan_dw_edit
end type
end forward

global type w_sysplan_dw_edit from w_publ_base
integer width = 3611
integer height = 1580
string title = "布局设置"
boolean minbox = false
windowtype windowtype = response!
long backcolor = 134217738
cb_1 cb_1
cb_2 cb_2
cb_3 cb_3
cb_5 cb_5
dw_1 dw_1
r_bar r_bar
ln_bar ln_bar
ln_bar2 ln_bar2
end type
global w_sysplan_dw_edit w_sysplan_dw_edit

type variables
Long cur_type = -1
Long uc_column_int
Long cur_nomodify[]
Long cur_start = 0
String cur_win

String dwoselect
String cur_mod[]

Long cur_resize = 0

Long cur_select = 0
Long ii_x_scroll,ii_y_scroll
Long cur_x,cur_y

String cur_chname[]
long cur_mainid
end variables

forward prototypes
public subroutine wf_open ()
public subroutine wf_aoto_taborder ()
public function integer wf_get_max (integer arg_type)
public subroutine wf_show (integer arg_show[])
public subroutine wf_get_columnname (ref string arg_name[])
public function integer wf_get_max (integer arg_type, integer arg_long[])
end prototypes

public subroutine wf_open ();
long nColumnCount,nColumnIndex
string des_1,des_2,des_3,szColumn,ls_pkcolname
string ls_name
nColumnCount = Integer( dw_1.Object.DataWindow.Column.Count)
ls_name = dw_1.describe("DataWindow.Objects")

string ls_a[]
long i=0
do while pos(ls_name,'~t') > 1 
	i++
	ls_a[i] = mid(ls_name,1,pos(ls_name,'~t') -1)
	ls_name = mid(ls_name,pos(ls_name,'~t') + 1,len(ls_name))
loop

//i++
//ls_a[i] = ls_name
//
//FOR  i= 1 to upperbound(ls_a) 
//	des_1 = ls_a[i]
//	dw_1.modify(des_1+'.moveable = 1')
//	dw_1.modify(des_1+'.resizeable = 1')
//	dw_1.modify(des_1+'.border = 2')
////	dw_1.modify(des_1+'.color = 255')
//next
end subroutine

public subroutine wf_aoto_taborder ();//Long nColumnIndex,nColumnCount,lRow,ls_i,i = 1
//String des_1,des_2,szColumn,str
//String Name[]
//Long ll_x[],ll_y[],ll_width[],ll_height[]
//Long ll_count
//
////获取所有可以编辑的字段名称、横纵坐标
//nColumnCount = Integer( dw_1.Object.DataWindow.Column.Count)
//FOR nColumnIndex = 1 TO nColumnCount
//	des_1 = dw_1.DESCRIBE( "#" + String(nColumnIndex) + ".Name")
//	des_2 = dw_1.DESCRIBE(des_1+ "_t.Text")
//	
//	szColumn = f_strip( des_2)
//	IF Long(dw_1.DESCRIBE(des_1+ ".Visible")) = 1 AND Long(dw_1.DESCRIBE(des_1+ ".x")) > 0 THEN
//		IF nColumnIndex <= uc_column_int THEN
//			Name[i] = des_1
//			ll_x[i] = Long(dw_1.DESCRIBE(des_1+ ".x"))
//			ll_y[i] = Long(dw_1.DESCRIBE(des_1+ ".y"))
//			ll_width[i] = Long(dw_1.DESCRIBE(des_1+ ".width"))
//			ll_height[i] = Long(dw_1.DESCRIBE(des_1+ ".height"))
//			i++
//		END IF
//	END IF
//NEXT
////////----------------------------
//
//ll_count = i - 1
//
//Long Min,minnub
//Long newx[],j = 1,ll_cnt,ll_t,midx[],k,ll_null[]
//String newname[],ls_t,midname[]
//String ls_null[]
//
//cnt:
//
////找出纵坐标最小字段
//Min = ll_y[1]
//minnub = 1
//FOR i = 2 TO ll_count
//	IF Min <= ll_y[i]  THEN
//		
//	ELSE
//		Min = ll_y[i]
//		minnub = i
//	END IF
//NEXT
//////////////--------------------------
//
////找出与最少纵坐标字段同行的所有字段
//j = 1
//FOR i = 1 TO ll_count
//	IF ll_y[i] >= ll_y[minnub] AND ll_y[i] <= (ll_height[minnub] +ll_y[minnub]) THEN
//		midname[j] = Name[i]
//		midx[j] = ll_x[i]
//		j++
//	END IF
//NEXT
//ll_cnt = j -1
///////-------------------------------
//
////将同行的字段进行排序（按横坐标大小）
//FOR i = 1 TO ll_cnt - 1
//	FOR j = i + 1 TO ll_cnt
//		IF midx[i] < midx[j] THEN
//			
//		ELSE
//			ll_t = midx[i]
//			midx[i] = midx[j]
//			midx[j] = ll_t
//			ls_t = midname[i]
//			midname[i] = midname[j]
//			midname[j] = ls_t
//		END IF
//	NEXT
//NEXT
//////////////----------------------------
//
////删除已经排序的字段
////FOR i = 1 TO ll_count
////	FOR j = 1 TO ll_cnt
////		IF Name[i] = midname[j] THEN
////			FOR k = i TO ll_count -1
////				Name[k] = Name[k+1]
////				ll_x[k] = ll_x[k+1]
////				ll_y[k] = ll_y[k+1]
////				ll_width[k] = ll_width[k+1]
////				ll_height[k] = ll_height[k+1]
////			NEXT
////			ll_count --
////		END IF
////	NEXT
////NEXT
//
//FOR i = 1 TO ll_count
//	FOR j = 1 TO ll_cnt
//		IF Name[i] = midname[j] THEN
//			Name[i] = ''
//			k++
//		END IF
//	NEXT
//NEXT
//
//j = 0
//FOR i = ll_count  TO 1 STEP -1
//	IF Name[i] = '' THEN
//		FOR k = i TO ll_count -1
//			Name[k] = Name[k+1]
//			ll_x[k] = ll_x[k+1]
//			ll_y[k] = ll_y[k+1]
//			ll_width[k] = ll_width[k+1]
//			ll_height[k] = ll_height[k+1]			
//		NEXT
//		j++
//	END IF
//NEXT
//
//ll_count = ll_count - j
//
//////////----------------------------
//
////将排好序的一行字段，放入目的数组，清空临时数组
//Long  ll_bnd
//ll_bnd = UpperBound(newname)
//FOR i = 1 TO ll_cnt
//	newname[ll_bnd + i] =  midname[i]
//NEXT
//
//
//midname[] = ls_null[]
//midx[] = ll_null[]
//////////////-----------------------------------
//
//IF ll_count > 0 THEN
//	GOTO cnt
//END IF
//
//Long  aaa
//String ls_taborder_auto = ''
//
//FOR i = 1  TO UpperBound(newname)
//	ls_taborder_auto = ls_taborder_auto + newname[i]+".Tabsequence="+String(i * 10)+'~t'
//NEXT
//
//
//String ls_data
//ls_data = dw_1.DataObject
///////保存taporder
//UPDATE sys_user_dwnSyntax
//	SET dwnSyntax_layout_column_taporder = :ls_taborder_auto
//	WHERE empid = :sys_empid
//	AND dwname = :ls_data;
//IF sqlca.SQLCode = 0 THEN
//	IF sqlca.SQLNRows = 0 THEN
//		INSERT INTO sys_user_dwnSyntax
//			(empid,
//			dwname,
//			dwnSyntax_filter,
//			dwnSyntax_sort,
//			dwnSyntax_layout_column_visible,
//			dwnSyntax_layout_column_width,
//			dwnSyntax_layout_column_alignment,
//			dwnSyntax_layout_column_pos,
//			dwnSyntax_layout_column_edit,
//			dwnSyntax_layout_column_font,
//			dwnSyntax_layout_column_height,
//			dwnSyntax_layout_column_taporder)
//			Values(:publ_userid,:ls_data,'','','','','','','','','',:ls_taborder_auto);
//	END IF
//END IF
//
//COMMIT;
///////////////////////////
//
////messagebox('',ls_taborder_auto)
//
//dw_1.ins_mdfstr_column_taporder = ls_taborder_auto
//
//MessageBox('提示','OK')




end subroutine

public function integer wf_get_max (integer arg_type);//wf_get_max()

long nColumnIndex,nColumnCount,lRow,ls_i,j=1
string des_1,des_2,szColumn,str
long ll_x[100],ll_y[100],ll_width[100],ll_height[100]

//获取所有可以编辑的字段名称、横纵坐标


string des_3,ls_pkcolname
string ls_name
nColumnCount = Integer( dw_1.Object.DataWindow.Column.Count)
ls_name = dw_1.describe("DataWindow.Objects")

string ls_a[]
long i=0
do while pos(ls_name,'~t') > 1 
	i++
	ls_a[i] = mid(ls_name,1,pos(ls_name,'~t') -1)
	ls_name = mid(ls_name,pos(ls_name,'~t') + 1,len(ls_name))
loop

i++
ls_a[i] = ls_name

FOR  i= 1 to upperbound(ls_a) 
	des_1 = ls_a[i]
	if long(dw_1.describe(des_1+'.visible')) = 1 then
		ll_x[j] = long(dw_1.describe(des_1+'.x'))
		ll_y[j] = long(dw_1.describe(des_1+'.y'))
		ll_width[j] = long(dw_1.describe(des_1+'.width'))
		ll_height[j] = long(dw_1.describe(des_1+'.height'))
		j++
	end if
next

long ll_maxwid,ll_maxhig

ll_maxwid = ll_x[1] + ll_width[1]

for i = 2 to j -1 
	if ll_maxwid < ll_x[i] + ll_width[i] then
		ll_maxwid = ll_x[i] + ll_width[i]
	end if
next

ll_maxhig = ll_y[1] + ll_height[1]
for i =2 to j -1 
	if ll_maxhig < ll_y[i] + ll_height[i] then
		ll_maxhig = ll_y[i] + ll_height[i]
	end if
next

if arg_type = 1 then
	return ll_maxwid + 50
elseif arg_type = 2 then
	return ll_maxhig + 50
end if


end function

public subroutine wf_show (integer arg_show[]);IF UpperBound(arg_show) <= 0 THEN RETURN

Long i,ll_maxw,ll_maxh,ll_x,ll_y,ll_width,ll_height,ll_with_t,ll_x_t
long j,ld_x,ld_y,ld_width,ld_height,ld_with_t,ld_x_t,k= 0
String arg_name[]
FOR i = 1 TO UpperBound(arg_show)

	ll_maxh = wf_get_max(2)
	
	wf_get_columnname(arg_name)
	
	ll_x = Long(dw_1.DESCRIBE(arg_name[arg_show[i]]+'.x'))
	ll_x_t = Long(dw_1.DESCRIBE(arg_name[arg_show[i]]+'_t.x'))
	ll_y = Long(dw_1.DESCRIBE(arg_name[arg_show[i]]+'.y'))
	ll_width = Long(dw_1.DESCRIBE(arg_name[arg_show[i]]+'.width'))
	ll_with_t = Long(dw_1.DESCRIBE(arg_name[arg_show[i]]+'_t.width'))
	ll_height = Long(dw_1.DESCRIBE(arg_name[arg_show[i]]+'.height'))
	
	k= 0
	for j = 1 TO UpperBound(arg_name)
		if arg_name[j] = arg_name[arg_show[i]] then continue
		ld_x = Long(dw_1.DESCRIBE(arg_name[j]+'.x'))
		ld_x_t = Long(dw_1.DESCRIBE(arg_name[j]+'_t.x'))
		ld_y = Long(dw_1.DESCRIBE(arg_name[j]+'.y'))
		ld_width = Long(dw_1.DESCRIBE(arg_name[j]+'.width'))
		ld_with_t = Long(dw_1.DESCRIBE(arg_name[j]+'_t.width'))
		ld_height = Long(dw_1.DESCRIBE(arg_name[j]+'.height'))
		
		if ld_y < ll_y and ld_y + ld_height > ll_y or ld_y > ll_y and ld_y < ll_y + ll_height then
			if ll_x_t > ld_x + ld_width  or ld_x_t > ll_x + ll_width   then
				goto ext
			end if	
		else
			k++
		end if 		
	next
	
	if k + 1 = UpperBound(arg_name) then goto ext
		
	
	IF ll_maxh - 35 + ll_height >  dw_1.Height THEN
		IF ll_maxh - 35 + ll_height < THIS.Height - 300 THEN
			IF i > 1 THEN
				IF Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.x')) + Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.width')) &
					+ 20 + Long(dw_1.DESCRIBE(arg_name[arg_show[i]]+'_t.width')) + Long(dw_1.DESCRIBE(arg_name[arg_show[i]]+'.width')) &
					<= dw_1.Width THEN
					dw_1.Modify(arg_name[arg_show[i]]+'.y ='+String(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.y')))
					dw_1.Modify(arg_name[arg_show[i]]+'.x ='+String(Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.x')) + Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.width')) + 20 +ll_with_t))
					dw_1.Modify(arg_name[arg_show[i]]+'_t.y ='+String(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.y')))
					dw_1.Modify(arg_name[arg_show[i]]+'_t.x ='+String(Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.x')) + Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.width')) + 20))
				ELSE
					dw_1.Modify(arg_name[arg_show[i]]+'.y ='+String(ll_maxh - 35))
					dw_1.Modify(arg_name[arg_show[i]]+'.x ='+String(ll_with_t + 10))
					dw_1.Modify(arg_name[arg_show[i]]+'_t.y ='+String(ll_maxh - 35))
					dw_1.Modify(arg_name[arg_show[i]]+'_t.x ='+String(5))
					dw_1.Height = ll_maxh - 15 + ll_height -200
				END IF
			ELSE
				
				dw_1.Modify(arg_name[arg_show[i]]+'.y ='+String(ll_maxh - 35))
				dw_1.Modify(arg_name[arg_show[i]]+'.x ='+String(ll_with_t + 10))
				dw_1.Modify(arg_name[arg_show[i]]+'_t.y ='+String(ll_maxh - 35))
				dw_1.Modify(arg_name[arg_show[i]]+'_t.x ='+String(5))
				dw_1.Height = ll_maxh - 15 + ll_height -200
			END IF
		END IF
		
	ELSE
		IF i > 1 THEN
			IF Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.x')) + Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.width')) &
				+ 20 + Long(dw_1.DESCRIBE(arg_name[arg_show[i]]+'_t.width')) + Long(dw_1.DESCRIBE(arg_name[arg_show[i]]+'.width')) &
				<= dw_1.Width THEN
				dw_1.Modify(arg_name[arg_show[i]]+'.y ='+String(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.y')))
				dw_1.Modify(arg_name[arg_show[i]]+'.x ='+String(Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.x')) + Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.width')) + 20 +ll_with_t))
				dw_1.Modify(arg_name[arg_show[i]]+'_t.y ='+String(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.y')))
				dw_1.Modify(arg_name[arg_show[i]]+'_t.x ='+String(Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.x')) + Long(dw_1.DESCRIBE(arg_name[arg_show[i - 1]]+'.width')) + 20))
			ELSE
				dw_1.Modify(arg_name[arg_show[i]]+'.y ='+String(ll_maxh - 35))
				dw_1.Modify(arg_name[arg_show[i]]+'.x ='+String(ll_with_t + 10))
				dw_1.Modify(arg_name[arg_show[i]]+'_t.y ='+String(ll_maxh - 35))
				dw_1.Modify(arg_name[arg_show[i]]+'_t.x ='+String(5))
			END IF
		ELSE
			dw_1.Modify(arg_name[arg_show[i]]+'.y ='+String(ll_maxh - 35))
			dw_1.Modify(arg_name[arg_show[i]]+'.x ='+String(ll_with_t + 10))
			dw_1.Modify(arg_name[arg_show[i]]+'_t.y ='+String(ll_maxh - 35))
			dw_1.Modify(arg_name[arg_show[i]]+'_t.x ='+String(5))
		END IF
		
	END IF
	
	ext:
NEXT



end subroutine

public subroutine wf_get_columnname (ref string arg_name[]);long nColumnIndex,nColumnCount,lRow,ls_i,i= 0
string ls_name[],des_1,des_2,szColumn

s_dw_uc_rbtnfilter_setlayout_rt ls_s_rt

nColumnCount = Integer( dw_1.Object.DataWindow.Column.Count)

For nColumnIndex = 1 To nColumnCount
	des_1= dw_1.Describe( "#" + String(nColumnIndex) + ".Name") 
	des_2= dw_1.describe(des_1+ "_t.Text")
	
	szColumn = f_strip( des_2) 
	If szColumn <> "!" Then
		i++
		ls_name[nColumnIndex] = des_1
	end if
	
next

arg_name = ls_name
//return ls_name
end subroutine

public function integer wf_get_max (integer arg_type, integer arg_long[]);//wf_get_max()

long nColumnIndex,nColumnCount,lRow,ls_i,j=1
string des_1,des_2,szColumn,str
long ll_x[100],ll_y[100],ll_width[100],ll_height[100]

//获取所有可以编辑的字段名称、横纵坐标


string des_3,ls_pkcolname
string ls_name
nColumnCount = Integer( dw_1.Object.DataWindow.Column.Count)
ls_name = dw_1.describe("DataWindow.Objects")

string ls_a[]
long i=0
//do while pos(ls_name,'~t') > 1 
//	i++
//	ls_a[i] = mid(ls_name,1,pos(ls_name,'~t') -1)
//	ls_name = mid(ls_name,pos(ls_name,'~t') + 1,len(ls_name))
//loop
//
//i++
//ls_a[i] = ls_name

wf_get_columnname(ls_a)

FOR  i= 1 to upperbound(ls_a) 
	des_1 = ls_a[i]
//	if long(dw_1.describe(des_1+'.visible')) = 1 then
		ll_x[j] = long(dw_1.describe(des_1+'.x'))
		ll_y[j] = long(dw_1.describe(des_1+'.y'))
		ll_width[j] = long(dw_1.describe(des_1+'.width'))
		ll_height[j] = long(dw_1.describe(des_1+'.height'))
		j++
//	end if
next

long ll_maxwid,ll_maxhig,k

ll_maxwid = ll_x[1] + ll_width[1]

for i = 2 to j -1 
	for k =1 to upperbound(arg_long)
		if i = arg_long[k] then
			goto ext1
		end if
	next
	
	if ll_maxwid < ll_x[i] + ll_width[i] then
		ll_maxwid = ll_x[i] + ll_width[i]
	end if
	
	ext1:
next

ll_maxhig = ll_y[1] + ll_height[1]
for i =2 to j -1 
	
	for k =1 to upperbound(arg_long)
		if i = arg_long[k] then
			goto ext2
		end if
	next
	
	if ll_maxhig < ll_y[i] + ll_height[i] then
		ll_maxhig = ll_y[i] + ll_height[i]
	end if
	
	ext2:
next

if arg_type = 1 then
	return ll_maxwid + 50
elseif arg_type = 2 then
	return ll_maxhig + 50
end if


end function

on w_sysplan_dw_edit.create
int iCurrent
call super::create
this.cb_1=create cb_1
this.cb_2=create cb_2
this.cb_3=create cb_3
this.cb_5=create cb_5
this.dw_1=create dw_1
this.r_bar=create r_bar
this.ln_bar=create ln_bar
this.ln_bar2=create ln_bar2
iCurrent=UpperBound(this.Control)
this.Control[iCurrent+1]=this.cb_1
this.Control[iCurrent+2]=this.cb_2
this.Control[iCurrent+3]=this.cb_3
this.Control[iCurrent+4]=this.cb_5
this.Control[iCurrent+5]=this.dw_1
this.Control[iCurrent+6]=this.r_bar
this.Control[iCurrent+7]=this.ln_bar
this.Control[iCurrent+8]=this.ln_bar2
end on

on w_sysplan_dw_edit.destroy
call super::destroy
destroy(this.cb_1)
destroy(this.cb_2)
destroy(this.cb_3)
destroy(this.cb_5)
destroy(this.dw_1)
destroy(this.r_bar)
destroy(this.ln_bar)
destroy(this.ln_bar2)
end on

event open;call super::open;s_dw_uc_modify s_modify
s_modify = Message.PowerObjectParm

Long ll_billid,ll_scid
dw_1.DataObject = s_modify.datawinname_uc
uc_column_int = s_modify.uc_column_int
cur_win = s_modify.win
cur_mainid = s_modify.mainid

//dw_1.Width = s_modify.uc_width
//dw_1.Height = s_modify.uc_height

cur_mod = s_modify.nomod
cur_start = 1

//dw_1.Object.datawindow.detail.Height = 2000
//dw_1.Object.datawindow.detail.Height.AutoSize = TRUE


dw_1.TriggerEvent(Constructor!)

dw_1.SetTransObject(sqlca)

cur_resize = 1

wf_open()





end event

event close;call super::close;s_resize s_size
s_size.backtype = cur_type

s_size.Width = dw_1.Width
s_size.Height = dw_1.Height

CloseWithReturn(THIS,s_size)

end event

event key;call super::key;//if key=Keyleftarrow! or key=Keyrightarrow! or key=Keyuparrow! or key=Keydownarrow! then
//	
//end if 
end event

event resize;call super::resize;ln_bar.EndX = THIS.Width
ln_bar2.EndX = THIS.Width
r_bar.Width = THIS.Width


dw_1.width = this.width - dw_1.x - 40
dw_1.Height = this.Height - dw_1.y - 140



end event

type cb_func from w_publ_base`cb_func within w_sysplan_dw_edit
boolean visible = false
string text = "工具"
end type

type cb_exit from w_publ_base`cb_exit within w_sysplan_dw_edit
integer x = 805
integer width = 151
integer height = 164
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event cb_exit::clicked;//不保存布局
cur_type = -1

close(parent)
end event

type cb_1 from uo_imflatbutton within w_sysplan_dw_edit
integer x = 654
integer width = 151
integer height = 164
integer taborder = 30
boolean bringtotop = true
string normalpicname = "ok.bmp"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;//保存修改好布局
cur_type = 1
dw_1.triggerevent(destructor!)
/////////////////////


close(parent)
end event

type cb_2 from uo_imflatbutton within w_sysplan_dw_edit
integer x = 503
integer width = 151
integer height = 164
integer taborder = 40
boolean bringtotop = true
string text = "应用"
string normalpicname = "update.BMP"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;//保存修改好布局
cur_type = 1
dw_1.TriggerEvent(Destructor!)
/////////////////////
Long ll_width,ll_height

f_reset_uc(cur_mainid,dw_1.Width,dw_1.Height)



end event

type cb_3 from uo_imflatbutton within w_sysplan_dw_edit
integer width = 256
integer height = 164
integer taborder = 20
boolean bringtotop = true
string text = "属性修改"
string normalpicname = "setting.bmp"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;dw_1.triggerevent('ue_setlayout')


end event

type cb_5 from uo_imflatbutton within w_sysplan_dw_edit
integer x = 256
integer width = 247
integer height = 164
integer taborder = 30
boolean bringtotop = true
string text = "重置布局"
string normalpicname = "p1.BMP"
integer picsize = 16
toolbaralignment pic_align = alignattop!
boolean border = false
end type

event clicked;call super::clicked;//dw_1.uf_reset_layout(uc_column_int)
//dw_1.uf_save_profile_layout()


dw_1.Triggerevent(Constructor!)
end event

type dw_1 from u_dw_rbtnfilter within w_sysplan_dw_edit
integer y = 188
integer width = 3026
integer height = 704
integer taborder = 20
boolean bringtotop = true
boolean hscrollbar = true
boolean vscrollbar = true
boolean resizable = true
boolean hsplitscroll = true
borderstyle borderstyle = StyleRaised!
end type

event constructor;call super::constructor;dw_1.InsertRow(0)
end event

type r_bar from rectangle within w_sysplan_dw_edit
long linecolor = 16777215
long fillcolor = 1073741824
integer x = 2203
integer width = 91
integer height = 156
end type

event constructor;this.fillcolor = 14215660
this.linecolor = 14215660
this.x = -1
this.y = -1
this.height = ln_bar.beginy - 5

end event

type ln_bar from line within w_sysplan_dw_edit
long linecolor = 268435456
integer linethickness = 4
integer beginy = 172
integer endx = 3200
integer endy = 172
end type

type ln_bar2 from line within w_sysplan_dw_edit
long linecolor = 16777215
integer linethickness = 4
integer beginx = 9
integer beginy = 176
integer endx = 3273
integer endy = 176
end type