treeview 没有选择时出错
本帖最后由 yunsuifeng2009 于 2013-06-07 17:11:01 编辑 做了一个treeview1

因为功能需要，要showmessage（treeview1.Selected.Text ）或者 变量 := treeview1.Selected.Text;

在treeview1选择的情况下没有问题。

但是有些情况是不需要选择treeview1的，这个时候运行到showmessage（treeview1.Selected.Text ）或者 变量 := treeview1.Selected.Text时，应用程序就会出错。

我本来想当treeview1没有选择的时候（没有碰过treeview1控件时），用以下方法来判断

   
if (treeview1.Selected.<>nil) or (treeview1.Selected.Level <> 0) then
showmessage（treeview1.Selected.Text ）//或者 变量 := treeview1.Selected.Text

但是还是会错，好像判断不出来啊T_T

请问一下，有什么方法知道treeview没有碰过，然后让我跳过显示treeview1.Selected.Text吗？
网上搜索了很多资料都没得到想要的答案。 TreeView 应用 Delphi
[解决办法]
if (treeview1.Selected<>nil) then
showmessage（treeview1.Selected.Text ）
else
if (treeview1.Selected.Level <> 0) then
showmessage（treeview1.Selected.Text ）;

除非逻辑短路
[解决办法]

if (tv1.Selected<>nil) then
showmessage(tv1.Selected.Text);
tv1.Selected := nil;