hur.cn - 华软网

 热门搜索

急求,子窗口设按钮实现父窗口的上下行移动思路

  作者:未知    来源:网络    更新时间:2018/7/4
程序原来设计时父窗口有一grid格式数据窗口dw_a,双击dw_a时弹出子窗口,传递主键给子窗口(freeform格式)数据窗口dw_b,dw_b检索主键,刷出数据,现在客户要求在子窗口添加上下行移动功能,也就是单击一个button实现dw_a上的上移下移,并且将检索出的数据显示在freeform上,求此思路。
------华软网友回答------
如果dw_a和dw_b的数据完全一致,仅仅只是显示方式不同,可以按如下处理:

父窗口双击dw_a时
open(子窗口,dw_a)

子窗口open
datawindow ldw
ldw=create datawindow
ldw.dataobject=父窗口.dw_a.dataobject
ldw.settransobject(sqlca)
ldw=message.powerobjectparm
ldw.sharedata(dw_b)

dw_b.scrolltorow(ldw.getrow())
dw_b.setrow(ldw.getrow())

之后,子窗口中只需要用dw_b的滚动条或在dw_b中按上下键即可实现记录的上下移动。
------华软网友回复------
上面有一点忘说了,子窗口的open里的(datawindow ldw)应该定义成实例变量。
------华软网友回复------
谢谢,此思路不错,但是处理此问题的关键是原来的此数据窗口在打开时即按主键检索,如果传递这个数据窗口,整个程序就得重做啦,呜呜,有没有什么方法比如
window lwind = getfirstsheet()返回那个父窗口,然后
lwind.cb_priorrow.triggerevent("clicked")
可以通过当前激活的窗口控制后面的窗口,实在没有,就按你的思路做,一会散分
     
华软声明:本内容来自网络,如有侵犯您版权请来信指出,本站立即删除。