treeview 没有选择时出错

Question

本帖最后由 yunsuifeng2009 于 2013-06-07 17:11:01 编辑

Answer 1

if (treeview1.Selected<>nil) then
  showmessage（treeview1.Selected.Text ）
else
if (treeview1.Selected.Level <> 0) then
  showmessage（treeview1.Selected.Text ）;除非逻辑短路

Answer 2

if (treeview1.Selected=nil) then
  showmessage（'treeview1.Selected=nil!'）
else
if (treeview1.Selected.Level <> 0) then
  showmessage（treeview1.Selected.Text ）;

Answer 3

ok了，我晕，居然这么简单，我之前好像也试过treeview1.Selected=nil，
果然还是要发个帖才可以。嗯。
csdn能辟邪啊。呵呵谢谢大哥。满分结贴。

Answer 4

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

Answer 5

最后我的应用是
  if (treeview1.Selected=nil)  then 变量 := ''
    else 变量 :=  tvdept.Selected.Text;

Answer 6

上面写错了，应该是
  if (treeview1.Selected=nil)  then 变量 := ''
    else 变量 :=  treeview1.Selected.Text;

Answer 7

csdn能辟邪啊！ ^_^ 楼主挺逗的！ 

Answer 8

谢谢啊，你的思路是：如果不是空就showmessage，如果是空就变成空。我回头试试。