首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

怎么让treeview单击加减号空白处不触发事件

2012-04-15 
如何让treeview单击加减号空白处不触发事件?+主窗体-子窗体子窗体1子窗体2当Treeview1单击子窗体1节点显示

如何让treeview单击加减号空白处不触发事件?
+主窗体
-子窗体
  子窗体1
  子窗体2
当Treeview1单击子窗体1节点显示出子窗体1窗口后,再关闭这个窗体,点加减号或Treeview1的空白处还是弹出那个窗体,如何屏蔽,当点+-号时不弹出窗体,点空白处也是

[解决办法]
没太明白你的意思,这个可能是你要的

procedure TForm1.TreeView1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
node: TTreeNode;
begin
if (Button = mbLeft) and (htOnItem in Treeview1.GetHitTestInfoAt( X, Y)) then
begin
node := TreeView1.GetNodeAt(X, Y);
if (node.Text = '子窗体1') then
childform1.show;
end;
end;
[解决办法]
procedure TFormMain.treeview1MouseDown(Sender: TObject;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
node:TTreeNode;
begin
Node:=treeview1.GetNodeAt(x,y);
if node<>nil then //判断是否选中内容
Node.Selected:=True;
end;

热点排行