pb 新增節點時點擊增加怎么一下新增了兩個節點?應該是一個節點才對的!
uj5u.com熱心網友回復:
你還是看看你的代碼吧。應該是沒問題的。
uj5u.com熱心網友回復:
if tv_1.getitem(ii_handle,tv_item) = -1 then returntv_item.label = ls_mess
select max(to_number(treeid)) into :ls_treeid from bm_bqbmb0_tree ;
ll_treeid=long(ls_treeid)+1
ls_parentid=string(tv_item.data)
ls_treeid=string(ll_treeid)
insert into bm_bqbmb0_tree(treeid,treename,parentid)
values(:ls_treeid,:ls_mess,:ls_parentid);
if sqlca.sqlcode<>0 then
messagebox("提示","生成資料失敗!"+sqlca.sqlerrtext)
return
else
commit;
ltvi_new.label = ls_mess
ltvi_new.data = ls_treeid
ltvi_new.children = false
// tv_1.insertitemlast(ii_handle,ltvi_new)
tv_1.expanditem(ii_handle)
messagebox("提示","新增病情編碼成功!")
end if
uj5u.com熱心網友回復:
就是這句tv_1.insertitemlast(ii_handle,ltvi_new)加上它會一下增加兩個節點,不加就一個也不顯示了。但是資料庫中是對的呢。只增加了一條資料
uj5u.com熱心網友回復:
在ExpandItem里有沒有寫,或者其他地方uj5u.com熱心網友回復:
一個是你自己增加的,還有個是itempopulate觸發時自動增加的你可以在增加的時候這樣處理
給你參考個代碼
treeviewitem tv_cur,tv_new
long ll_root,new_handle
string ls_closetype
//
ist_parm.opentype = "add"
ls_closetype = gs_closetype
ist_parm.int2 = ai_parentid
gs_closetype = '0'
openwithparm(w_knowledge_add,ist_parm,this)
if gs_closetype='1' then
//如果是點擊確定按鈕 或者 取消按鈕
ist_parm = message.powerobjectparm
if ist_parm.closetype='ok' then
ll_root = tv_1.getitem(al_handle,tv_cur)
if ll_root<>-1 then
if tv_cur.ExpandedOnce=true and tv_cur.Children=true then
//如果當前節點已經存在子節點
tv_new.SelectedPictureIndex = 3
tv_new.PictureIndex = 2
tv_new.label = ist_parm.string4
if ist_parm.int4<5 then tv_new.label = tv_new.label +"【" +levelcode[ist_parm.int4]+"】"
tv_new.data = string(ist_parm.int3)
new_handle=tv_1.InsertItemlast(al_handle,tv_new)
else
//如果沒有子節點
tv_cur.Children=true
tv_1.SetItem(al_handle,tv_cur)
end if
end if
end if
//
//
// //ClassicGSMType
// //messagebox("","1")
end if
gs_closetype = ls_closetype
return 0
uj5u.com熱心網友回復:
是不是在我的基礎上加上這個if tv_cur.ExpandedOnce=true and tv_cur.Children=true then判斷就可以了?怎么我的加上就在界面上新增沒有顯示了
uj5u.com熱心網友回復:
就是在增加節點之前,你那樣判斷下就可以轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/97886.html
標籤:控件與界面
上一篇:pb10如何實作在網頁查詢?
