用openwithparm打开窗口异常？

[dragon0615]

OpenWithParm(w_find_personnel,dw_personnel)打开一个response类型的窗口。

但弹出窗口却只有一个小标题栏（大概也就“开始”键那么大）。看弹出窗口（w_find_personnel）属性大小为（w：2500，h：1700）.请问是怎么回事啊？

[mittee]

前一段时间，我就看到论坛提到为什么数据窗口传不过去。
你把要传递的数据窗口设为全局变量了吗？？
： dw_personnel

[mittee]

看一下你的resize 事件

[dragon0615]

mittee(最后一条大白鲨) :
dw_personnel的类型是什么啊?(初学.问题很菜)

[dragon0615]

mittee(最后一条大白鲨) :
设了，没用啊
情况和以前一样

[lmby]

dw_personnel的类型: datawindow

[lmby]

看看w_find_personnel的open里有什么代码。

[dragon0615]

窗口open事件:
idw_action = Message.PowerObjectParm
dw_dept.SetTransObject(SQLCA)
dw_dept.Retrieve()
dw_dept.InsertRow(0)
sle_id.SetFocus()

cb_ok click事件;
String ls_input,ls_select
ls_select = Lower(idw_action.Describe("datawindow.table.select"))
IF rb_id.Checked = True THEN
IF sle_id.Text<>''THEN
ls_input=sle_id.Text
ls_select = ls_select+"where p_id='"+ls_input+"'"
CloseWithReturn(Parent,ls_select)
else
MessageBox('提示','请输入查询条件！')
end if
elseif rb_name.Checked = True THEN
IF sle_name.Text<>'' THEN
ls_input = sle_name.Text
ls_select = ls_select+"where name like '%"+ls_input+"%'"
CloseWithReturn(Parent,ls_select)
else
MessageBox('提示','请输入查询条件！')
end if
else
ls_input = dw_dept.getItemString(dw_dept.GetRow(),'deptid')
if not isnull(ls_input) then
ls_select = ls_select+"where dept_id='"+ls_input+"'"
CloseWithReturn(Parent,ls_select)
else
MessageBox('提示','请输入正确的查询条件！')
end if
end if