PB的数据窗口中如何让鼠标移动到的行变色?求答案
1个回答
展开全部
该函数返回值为:列名~t行号这样就得到了光标处所在的行。 我们必须先声明一个mousemove事件(pbm_mousemove),在该事件中这样写:
string ls_dwoname
long ll_pos,ll_row //分析并得到行号。
ls_dwoname=GetObjectAtPointer()
if isnull(ls_dwoname) or trim(ls_dwoname)="" then dw_1.modify("row_t.text='0'")returnend ifll_pos=pos(ls_dwoname,"~t")
if ll_pos<=0 then dw_1.modify("row_t.text='0'")returnend ifll_row=long(mid(ls_dwoname,ll_pos+1))
if ll_row<=0 then dw_1.modify("row_t.text='0'")returnend if //注意必须在数据窗口对象中放一个不可见的文本控件,假设为row_t
//并且将各列的background.color设置为:
//if (getrow()=integer(describe("row_t.text")),color1,color2)
//其中color1为光标所在行的颜色,color2为其他行的颜色
//这样就实现了。
string ls_dwoname
long ll_pos,ll_row //分析并得到行号。
ls_dwoname=GetObjectAtPointer()
if isnull(ls_dwoname) or trim(ls_dwoname)="" then dw_1.modify("row_t.text='0'")returnend ifll_pos=pos(ls_dwoname,"~t")
if ll_pos<=0 then dw_1.modify("row_t.text='0'")returnend ifll_row=long(mid(ls_dwoname,ll_pos+1))
if ll_row<=0 then dw_1.modify("row_t.text='0'")returnend if //注意必须在数据窗口对象中放一个不可见的文本控件,假设为row_t
//并且将各列的background.color设置为:
//if (getrow()=integer(describe("row_t.text")),color1,color2)
//其中color1为光标所在行的颜色,color2为其他行的颜色
//这样就实现了。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询