大家好,问一个listview和treeview的问题! (30分)

  • 主题发起人 主题发起人 winsock
  • 开始时间 开始时间
W

winsock

Unregistered / Unconfirmed
GUEST, unregistred user!
大家好!一个表
编号 类别 名称 价值
01 家私 P11 200
02 电器 P12 300
03 电器 P13 200
我已经用treeview显示类别(用select distinct语句),在listview中显示其他三项的信息!
问题就是当我在listview中删除了每条02,03记录后,在treeview里面还存在有电器这一类。
非要我把程序关了之后,进去电器一项才消失
该如何做呢?
谢谢,我的代码!
if listview1.SelCount>0 then
begin
listview1.Selected.Delete;
//接着删除表的语句delete from 表 where 字段=listivew1.selected.caption;

还有一个小问题
如何判断treeview为第一个节点时候不能让他删除呢?
如:
网络收藏
--心情故事
--网络文学

也就是网络收不能删除
为什么这样写不行呢?
if treeview1.items.Add=1 then
begin
showmessage('不能删除');
end;
 
你接着在判断以下listview1.items.count=0就把treeview1中当前类别删除呀
 
你没有进行
procedure TForm1.TreeView1Edited(Sender: TObject; Node: TTreeNode;
var S: String);
操作
 
谢谢了,那么如何判断treeview为第一个节点时候不能让他删除呢?
如:
网络收藏
--心情故事
--网络文学

也就是网络收不能删除
为什么这样写不行呢?
if treeview1.items.Add=1 then
begin
showmessage('不能删除');
end;
 
1、treeview.items.add返回的是一个TTreeNode而不是顺序号。所以当然不能写:if treeview1.items.add=1啦。
2、怎么用treeview.items.add呀? 这个是添加, 跟删除由什么关系?
3、判断是否第一项: if treeview1.items.selected = treeview1.items.item[0] then ...或者:if treeview1.items.selected.absoluteIndex=0 then ...
 
谢谢Another_eYes了,我昨天最后用了treeview1.selected.level=0这样来判断,已经解决!
还是得谢谢!也谢谢帮忙的各位朋友!
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
851
DelphiTeacher的专栏
D
后退
顶部