数据窗口问题,请教高手~~~~在线等

[justzhafeng]

我建立了一个数据窗口dw_1,一个数据窗口对象d_1,d_1中的字段有dd_no,cus_no,product_no,product_quantity,这4个字段在数据库中是在一张表dd里的(dd_no是主键),另外建立了个控件cb_1,我想实现的功能是在数据窗口中输入dd_no的值,然后点击cb_1,程序能在数据库中查找出cus_no,product_no,product_quantity的值再填入数据窗口各个相应的字段中去,请问能实现吗?如果能实现代码该怎么写?谢谢~~~~~~~~

[SKY_4K_PPM]

CB_1多余，直接在dd_no列的itemchanged 写事件就得了

[lllyyymmm]

直接在dd_no列的itemchanged 写事件就得了:
if dwo.name = 'dd_no' then
select cus_no into :ls_cusno,product_no into :ls_productno,product_quantity into ls_productq from dd where dd_no =:data;
dw_1.setitem(dw_1.getrow,'cus_no',ls_cusno)
.....
end if

[编程夜猫]

楼上和楼上的楼上方案可取。

[justzhafeng]

select语句有点不对,其他的都正确了,谢谢啊~~~~~~~
select cus_no,product_no,product_quantity into :ls_cusno,:ls_productno,:ls_productq from dd where dd_no =:ls_ddno;

[justzhafeng]

数据窗口对象里的dd_no字段有事件?在哪打开啊?我没找到!我只知道sle控件里有这个事件

[eviler]

是数据窗口的 itemchanged 事件
使用
if dwo.name = 'dd_no' then
………………
end if

[skyzcl]

string ls_cusno,ls_productno,ls_productq,ls_ddno
dw_1.accepttext()
ls_ddno = dw_1.getitemstring(dw_1.getrow(),'dd_no')
select cus_no into :ls_cusno,product_no into :ls_productno,product_quantity into ls_productq from dd where dd_no =:ls_ddno;

dw_1.setitem(dw_1.getrow,'cus_no',ls_cusno)
...
//同样赋值就OK了

[WorldMobile]

d_1数据窗口的sql语句改为：
select dd_no,cus_no,product_no,product_quantity from dd where dd_no = :as_dd_no
在d_1的constructor事件里
d_1.insertrow(0)

然后在按钮里写
string ls_dd_no
ls_dd_no = dw_1.getitemstring(dw_1.getrow(), 'dd_no')
dw_1.retrieve(ls_dd_no)

即可

[xiongshouyong]

靠...正确答案有了，你还结贴啊////