|

楼主 |
发表于 2008-7-21 15:31:04
|
显示全部楼层
Var
RootTree : TTreeNode;
lBizNode:TBizNode;
lFirstNode,lChildNode:TOrgChartNode;
lRootNodes:TStrings;
begin
TreeChart1.Clear;
lFirstNode:=TOrgChartNode.Create(TreeChart1);
with lFirstNode do
Text:='我是顶级';
lBizNode:=TBizNode.Create;
with lBizNode do
begin
//lBizNode.ID:='1';
DisplayName:='test';
//ObjectID:='1';
//StoredObjectID:='1';
//FullFileName:='a';
end;
TreeChart1.AddFirst(TOrgChartNode(lFirstNode),lFirstNode);
END;
这个是添加根节点的,但是为什么根节点的text没显示出来??
第二第三等那些节点怎么添加??
希望能给个详细的例子
搜索了许多都找不到明确的代码. |
|