我给一个程序:
long root_item
long new_item1,new_item2,new_item3
string temp_erea_name
long temp_erea_id
string temp_office_name
long temp_office_id
string temp_personel_name
long temp_personel_id
long temp_erea_number
long temp_office_number
long temp_personel_number
treeviewitem temp_tree
tv_1.setredraw(false)
tv_1.deleteitem( root_item)
temp_tree.label="员工分类"
temp_tree.pictureindex=1
temp_tree.selectedpictureindex=1
root_item=tv_1.insertitemlast(0,temp_tree)
dw_erea.settransobject(sqlca)
dw_erea.retrieve( )
dw_erea.setfilter( "personel_id=" + trim(string(personel_information.id)))
dw_erea.filter( )
for temp_erea_number=1 to dw_erea.rowcount( )
//显示地区
temp_erea_name=trim(dw_erea.getitemstring(temp_erea_number,"erea_name"))
temp_tree.label=temp_erea_name
temp_tree.pictureindex=1
temp_tree.selectedpictureindex=1
new_item1=tv_1.insertitemlast( root_item,temp_tree)
//显示办公室
dw_office.settransobject( sqlca)
dw_office.retrieve(temp_erea_name)
dw_office.setfilter( "personel_id=" + trim(string(personel_information.id)))
dw_office.filter( )
for temp_office_number=1 to dw_office.rowcount()
temp_office_name=trim(dw_office.getitemstring(temp_office_number,"office_name"))
temp_tree.label=temp_office_name
temp_tree.pictureindex=2
temp_tree.selectedpictureindex=2
new_item2=tv_1.insertitemlast(new_item1,temp_tree)
// //显示人员
dw_personel.settransobject( sqlca)
dw_personel.retrieve(temp_erea_name,temp_office_name)
dw_personel.setfilter( "personel_id=" + trim(string(personel_information.id)))
dw_personel.filter( )
for temp_personel_number=1 to dw_personel.rowcount()
temp_personel_name=trim(dw_personel.getitemstring( temp_personel_number,"name"))
temp_tree.label=temp_personel_name
temp_tree.pictureindex=3
temp_tree.selectedpictureindex=3
new_item3=tv_1.insertitemlast(new_item2,temp_tree)
next
next
next
tv_1.setredraw( true)
tv_1.expanditem( 1)