在TreeView的OnMouseDown事件中写代码:SelectNode := TreeView1.GetNodeAt(X, Y);
if not Assigned(SelectNode) then Exit;
if Shift = [ssLeft] then
// 左键单击
else if Shift = [ssRight] then
// 右键单击
case SelectNode.Level of //不同层次
0:
1:
...
end;
if not Assigned(SelectNode) then Exit;
if Shift = [ssLeft] then
// 左键单击
else if Shift = [ssRight] then
// 右键单击
case SelectNode.Level of //不同层次
0:
1:
...
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货