delphi中TreeView1控件怎么在每个节点上写事件啊
delphi中TreeView1控件怎么在每个节点上写事件啊
onclick嘛
OnClick事件，通过level控件是哪个层节点被点了
例： case treeview1.Selected.Level of
0:
1:
2:
end;
单击ＯｎＣｌｉｃｋ 展开ＯｎＥｘｐａｎｄｉｎｇ
单击事件
var
vNode: TTreeNode;
begin
vNode := TreeView1.Selected;
//然后写吧！
treeview的很多事件都是可以针对节点操作的,不知楼主想要什么事件
最常用的,OnChangeNode,OnExpanding
我的意思是对每个添加的节点都写代码 可惜写不了 双击 出现添加节点的框 无法写代码 很郁闷
没明白你的意思,每个节点都写代码?,你可以在节点的data属性中保存该节点的唯一ID,单击的时候判断该ID,再做出相应的操作
我说的好无助
比如TreeView1上 添加了2个一级节点 第一个名字为0 第2个是一 我想单击0 执行事件 单击1不执行
所有节点对于同一种操作，都响应同一个事件
需要在事件方法里根据参数判断被操作的是哪一个、哪一级的节点，再决定不同的反应
加个判断就可以了
if TreeView1.Selected.Text <>'1' then
showmessage(TreeView1.Selected.Text);
相关问答：
如何实现delphi 提交表单
我的思路是 webbrowser1 打开 谷歌
然后 鼠标 点击到 搜索里面
然后 输入 要搜索的关键字 然后 点击 搜索
我现在就是 如何 添入 要搜索的关键字 不� ......
我写了个小程序，上面添加了一个shockwaveflash控件，然后在movie里写入swf文件的路径，然后执行没有问题。
当我把这个程序转移到另一台电脑执行时， shockwaveflash 控件显示空白。也就是没有加载那个swf文件。 ......
//我在type定义一个tmyarray
type
tmyarray= array[0..255] of integer;
...
function myfun1(a:integer):tmyarray;
function myfun2(pt:array of integer):boolean;
//myfun2 要用到 ......
在程序中，我一般使用
try
...
except
...
end
来使一些数据库方面的错误不弹出来。。。
在编译好的程序，单独脱离IDE运行时，是不会有错误报出的。
但是在IDE下按F9运行时会报 ......
