5,386
社区成员
发帖
与我相关
我的任务
分享TreeView的DblClick事件中如何得到当前被选中的节点？
TreeView.DblClick过程中只有（Sender: TObject）参数，不象TreeView.Change(Sender: TObject;Node: TTreeNode)有Node参数。如何解决？谢谢！
...全文
请发表友善的回复…
发表回复
leaf4646 2003-04-23
- 打赏
- 举报
up
xzq111 2003-04-22
- 打赏
- 举报
haerbin982() 的方法很好
haerbin982 2003-04-22
- 打赏
- 举报
在树的单击事件中调用，反回一个节点
procedure TForm1.TreeViewClick(Sender: TObject);
begin
getnjnode(TreeView.Selected.Text):
end;
procedure TForm1.TreeViewClick(Sender: TObject);
begin
getnjnode(TreeView.Selected.Text):
end;
haerbin982 2003-04-22
- 打赏
- 举报
function TForm1.getnjnode(name:string): Ttreenode;
var
i:integer;
begin
result:=nil;
for i:=0 to treeView.Items.Count-1 do
begin
if treeView.Items.Item[i].Text=name then
begin
result:=treeView.Items.Item[i];
exit;
end;
end;
end;
var
i:integer;
begin
result:=nil;
for i:=0 to treeView.Items.Count-1 do
begin
if treeView.Items.Item[i].Text=name then
begin
result:=treeView.Items.Item[i];
exit;
end;
end;
end;
debussy 2003-04-22
- 打赏
- 举报
使用GetHitTest
