TTreeView 怎么样返回刚添加的节点引用? ( 积分: 100 )

TTreeView 怎么样返回刚添加的节点引用?

var
TVNode:TTreeNodes;
TVNodetemp:TTreeNodes;
i,j,t,pid:integer;
Place: TBookmark;
lname:string;

ADS.Active := true;

TV.Items.Clear;
ADS.First;
TVNode:=Tv.Items;
TVNodetemp := Tv.Items;

begin
if ADS['P_C_P_id']>0 then
begin
for j:=0 to TVNode.Count-1 do
begin
ADS.GotoBookmark(TVNode.Item[j].Data);
if ADS['P_C_C_id']=pid then
begin
TVNode.AddChildObject(TVNode.item[j],lname,Place);

TV.Items.AddChild(//怎么样引用本次添加的节点//,lname,Place),'昨天');
TV.Items.AddChild(//怎么样引用本次添加的节点//,lname,Place),'今天');

break;
end
end


end
else
TVnode.AddChildObject(nil,ADS['P_C_title'],ADS.GetBookmark);
ADS.GotoBookmark(Place);

ADS.Next;
end;
end;
---------------------------------------------------------------
TV.Items.AddChild(//怎么样引用本次添加的节点//,lname,Place),'昨天');
TV.Items.AddChild(//怎么样引用本次添加的节点//,lname,Place),'今天');
这两句的第一个参数怎么写?
急用!哥哥姐姐们帮我好吗?

var
newnode,tempnode:TTreeNode;
begin
if TreeView.items.count=0 then tempnode:=nil;
else if TreeView.selected<>nil then tempnode:=TreeView.selected
else tempnode:=TreeView.Items.Item[0];
newnode:= TreeView.Items.AddChild(tempnode,'新节点');//此为新加入的节点
showmessage(newnode.text);
end;
随手写的；应该没问题

谢谢,我试试!

谢谢,马上结帐!

TVNode.AddChildObject(TVNode.item[j],lname,Place);
这句本身就会一个TTreeNode值的~~~
你再设置一个临时变量
tmpnode:=TVNode.AddChildObject(TVNode.item[j],lname,Place);
TV.Items.AddChild(tmpnode,lname,Place),'昨天');
应该就可以了