1.定制一个您要弹出的response式窗口(假设名称为w_response,窗口上控件为dw_1,sle_1,cb_ok,cb_close):
在open事件写下如下代码:
string ls_value
ls_value = message.stringparm
sle_1.text = ls_value
dw_1.settransobject(sqlca)
dw_1.retrieve(sle_1.text)
cb_ok的代码:
...您要处理的代码
string ls_return
ls_return = ..............
closewithreturn(parent,ls_return)
cb_close的代码:
closewithreturn(parent,'')
2.在数据窗口中定义一个事件:dwkeydown
具体如下:
Access : Return Type : EventName :
public long dwkeydown
Pass By : argument type : Argument Name :
value keycode key
value unsignedlong keyflags
Event Id: pbm_dwnkey
代码如下:
if key=keyenter! then
this.accepttext()
ls_gettext = this.gettext()
li_row_current = this.getrow()
choose case this.GetColumnName()
case 'aa'
OpenWithParm(w_response,ls_gettext)
if message.stringparm = '' or isnull(message.stringparm) then
//表示没有返回值
else
//写下你要操作的代码
end if
case 'bb'
..........
case 'cc'
..........
case 'dd'
..........
end choose
dw有自带的dwkeydown事件,定义后
可以这样写
String ls_column
ls_column = dw_1.GetColumnName()
if ls_column = "aa" Then
open(w_1)
end if
(可选择某一项,参数就是刚才录入的123)不明白
是不是就这样的
根据123作为条件弹出数据窗口