上一页 1 ··· 15 16 17 18 19 20 21 22 23 ··· 29 下一页
摘要: PTNodeInfo=^TNodeInfo; TNodeInfo=record id,preId,text:string; end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.CreateTree1; procedure CreateTree(Pre:string;preNode:TTreeN... 阅读全文
posted @ 2008-12-11 17:37 vincent.lee 阅读(193) 评论(0) 推荐(0)
上一页 1 ··· 15 16 17 18 19 20 21 22 23 ··· 29 下一页