/* 动态设置某列为下拉数据窗口 */
/*
* d_dddw_dep 数据窗口对象名称
* dept_name 列名
* dept_id 列名
*/
dw_1.Modify("department_id.DDDW.Name=d_dddw_dep ")
dw_1.Modify("department_id.DDDW.DisplayColumn='dept_name' ")
dw_1.Modify("department_id.DDDW.DataColumn='dept_id' ")
dw_1.modify("department_id.DDDW.autoretrieve = yes")
dw_1.modify("department_id.DDDW.allowEdit = no")
dw_1.modify("department_id.DDDW.useAsBorder= yes")
dw_1.modify("department_id.DDDW.vscrollbar = yes ")
或:
dw_1.object.department_id.dddw.name = "d_dddw_dep"
dw_1.object.department_id.DDDW.DisplayColumn = "dept_name"
dw_1.object.department_id.DDDW.DataColumn = "dept_id"
// 子数据窗口检索
dw_1.getChild("department_id",dwc_child)
dwc_child.setTransObject(sqlca)
dwc_child.retrieve()
dwc_child.setTransObject(sqlca)
dwc_child.retrieve()