1 定义 window function ----- df_focus(long al_row,string as_colname) 均为public 类型,交并无返回值
//聚焦处理
dw_mcs832dw2.SelectRow(0,false)
dw_mcs832dw2.ScrollToRow(al_row)
dw_mcs832dw2.SetColumn(as_colname)
dw_mcs832dw2.SetFocus()
2 定义 window function ----- wf_selectrow(long al_row) al_row为public 类型,函数无返回值
//焦点处理函数
long ll_row
setpointer(hourglass!)
ll_row = al_row
dw_mcs832dw1.SetRow(ll_row)
dw_mcs832dw1.ScrollToRow(ll_row)
dw_mcs832dw1.SelectRow(0,False)
dw_mcs832dw1.SelectRow(ll_row,True)
dw_mcs832dw2.scrolltorow(ll_row)
if ll_row < 1 then return
//String ls_id ,ls_model,ls_flag,ls_flag1
//int li_control=0 //同步两个数据窗口的数据和焦点
//ls_id = dw_list.getitemstring(ll_row,"ispp_bank_code") //从数据窗口dw_list里取出bank code的值
//ls_model = dw_list.getitemstring(ll_row,"ispp_model_grp")
//ls_flag = dw_list.getitemstring(ll_row,'ISPP_DEL_FLAG')
//dw_detail.retrieve(ls_id,ls_model)
//wf_flag(ls_flag,li_control)
//dw_detail.setitem(1,'ISPP_DEL_FLAG',ls_flag)
//setpointer(arrow!
//*******************************************
//聚焦处理
//dw_mcs832dw2.SelectRow(0,false)
//dw_mcs832dw2.ScrollToRow(al_row)
//dw_mcs832dw2.SetColumn(as_colname)
//dw_mcs832dw2.SetFocus()
3 在Grid类型的数据窗口的Clicked 事件下编码:
long ll_rows
int ll_RowNbr,ll_ModifyRowNbr
ll_rows = dw_mcs832dw1.Retrieve()
if ll_rows < 0 then
MessageBox( "Database Error", "No rows retrieved")
return
end if
ll_RowNbr = dw_mcs832dw1.getClickedRow()
if ll_RowNbr = 0 then
return
else
ll_ModifyRowNbr = dw_mcs832dw1.getItemNumber(ll_RowNbr,1)
dw_mcs832dw2.retrieve(ll_ModifyRowNbr)
//dw_mcs832dw1.shareData(dw_mcs832dw2)
wf_selectrow(ll_RowNbr)
//return ll_ModifyRowNbr
end if