在窗口的open()事件中已经生成根节点
数据库表为“部门表（部门代码，部门名称，上级代码）”,dw_bm
在itempopulate()中写入以下代码，界面没有反应，请强人帮忙看看，谢谢
treeitem tv_bm,tv_item
int i,count
string bmname,bmdm,sjdm
datastore ds_bm
ds_bm=create datastore
ds_bm.dataobject="dw_bm"
ds_bm.settransobject(sqlca)
ds_bm.retrieve()
count=ds_bm.rowcount()
tv_1.setitem(handel,tv_item)
bmname=tv_item.label
for i=1 to count
   if bmname=ds_bm.getitemstring(i,2) then
       bmdm=ds_bm.getitemstring(i,1)
       for j=1 to count
           if   dm=ds_bm.getitemstring(j,3)  then
                 tv_bm.label=ds_bm.getitemstring(j,2)
                 tv_1.insetritemlast(handel,tv_bm)
           end if
        next
     end if
next
tv_1.etredraw(true)
destroy ds_bm

忘了
int j