treeview控件怎么和一个表相关联呢?

mailguoyy 2003-03-05 08:31:00
treeview控件怎么和一个表相关联呢?
...全文
29 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
bomber2001 2003-03-05
  • 打赏
  • 举报
回复
遍历.......
boyliulang 2003-03-05
  • 打赏
  • 举报
回复
用数据存储可以实现,先建立一个数据窗口,然后设置数据存储,读取数据添加到treeview。
给你一个例子:
treeviewitem ltvi_Sub1,ltvi_Sub2
long ll_handle2,ll_row1,ll_count1,ll_count2,ll_curr_id
n_ds lds_sub1,lds_sub2
string ls_curr_department_name
long ll_handle1, ll_root

ll_Root = this.FindItem(RootTreeItem!,0)
IF ll_Root > 0 THEN
this.DeleteItem(ll_Root)
END IF

tv_1.InsertItemFirst ( 0, 'Ö÷¹Ü²¿ÃÅ', 1)

lds_sub1 = Create n_ds
lds_sub1.DataObject = 'd_sys_popedom_tv2'
lds_sub1.SetTransObject(SQLCA)

lds_sub2 = Create n_ds
lds_sub2.DataObject = 'd_sys_popedom_tv3'
lds_sub2.SetTransObject(SQLCA)

ll_count1=lds_sub1.retrieve()
for ll_row1=1 to ll_count1 step 1
ls_curr_department_name=trim(lds_sub1.object.vc_department_name[ll_row1])
ll_curr_id=long(lds_sub1.object.n_department_pk[ll_row1])
ltvi_Sub1.Label = ls_curr_department_name
ltvi_Sub1.data = ll_curr_id
ll_count2=lds_sub2.retrieve(ll_curr_id)
if ll_count2>0 then
ltvi_Sub1.Children = True
ltvi_Sub1.PictureIndex = 1
ltvi_Sub1.SelectedPictureIndex = 1
else
ltvi_Sub1.Children = false
ltvi_Sub1.PictureIndex = 1
ltvi_Sub1.SelectedPictureIndex = 2
end if
ll_handle2=this.InsertItemlast(1,ltvi_Sub1)
next

destroy lds_sub1
destroy lds_sub2

this.ExpandItem(1)

754

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧