文件名称:
快速创建树的方法 (抛弃拙劣的数据库结构和算法)
开发工具:
文件大小: 278kb
下载次数: 0
上传时间: 2006-01-13
详细说明： 1、现在很多人都使用“父—子结构＋递归算法”来显示树型的层次结构，但是不得不说这是一种非常拙劣的方式，下面给大家一种简单方便的数据结构和算法，快速显示树型的层次结构：2、数据库结构例如表“国家”可以是这样：编号 名称----------01 中国0101 吉林省010101 长春市010102 吉林市0102 江苏省010201 南京市010202 常州市02 美国0201 密歇根州020101 底特律市0202 华盛顿州020201 温哥华市020202 西雅图市03 澳大利亚3、在 TreeView 中显示结构procedure CreateTree;const ID_DEPT = 2;var nLevel: Integer; pNodes: array[0..1023] of TTreeNode; lpID, lpName: string;begin ADODataSet1.Close; ADODataSet1.CommandText := 'SELECT * FROM [国家] ORDER BY [编号]'; ADODataSet1.Open; pNodes[0] := nil; TreeView1.Items. Clear; with ADODataSet1.Recordset do while not Eof do begin lpID := Fields['编号'].Value; lpName := Fields['名称'].Value; nLevel := Length(lpID) div ID_DEPT; pNodes[nLevel] := TreeView1.Items.AddChild(pNodes[nLevel - 1], lpName); MoveNext; end;end;4、短短 20 行，一次读取数据。有人可能问为什么把 pNodes 的大小设成 1024？你也可以设成 10000，随你便，不过 TreeView 如果有那么多节点早死机了。 ...展开收缩
(系统自动生成,下载前可以参看下载内容)
下载文件列表
相关说明
- 本站资源为会员上传分享交流与学习,如有侵犯您的权益,请联系我们删除.
- 本站是交换下载平台，提供交流渠道，下载内容来自于网络，除下载问题外，其它问题请自行百度。
- 本站已设置防盗链，请勿用迅雷、QQ旋风等多线程下载软件下载资源，下载后用WinRAR最新版进行解压.
- 如果您发现内容无法下载，请稍后再次尝试；或者到消费记录里找到下载记录反馈给我们.
- 下载后发现下载的内容跟说明不相乎，请到消费记录里找到下载记录反馈给我们，经确认后退回积分.
- 如下载前有疑问，可以通过点击"提供者"的名字，查看对方的联系方式，联系对方咨询.
