摘要：
ID类别父类别1A02B03C04AA15BB26CC3添加到TreeView中：1type2PpgInfo=^TpgInfo;34TpgInfo=record5aName:string;6aID:string;7aPID:string;8end;910//addtotv11procedureTForm2.add2tv(al:TList<TpgInfo>);12var13paRec:PpgInfo;14i:Integer;15find:Boolean;16begin17whileal.Count>0do18begin1920ifal[0].aPID='0'th 阅读全文
posted @ 2011-07-14 00:27 对镜弹箜篌 阅读(1117) 评论(0) 推荐(0)
浙公网安备 33010602011771号