Question

懂delphi的请根据这个代码做个access数据库（应该很简单3左右分钟搞定？）。

例程在这里：http://zhidao.baidu.com/question/172145055.html （注意还有http://wenwen.soso.com/z/q210884984.htm的图片。

要求在delphi7下成功运行并能正确显示结果！
我的邮箱：729851670QQ@.com

Answer 1

表名：CodeDepartment
列名：DepartmentCode varchar（50）
DepartmentName varchar（50）
ParentCode varchar（50）

Answer 2

我看了下，不知道说的对不对，感觉这段代码用的数据库为SQL Server而不是Access，至于数据库感觉应该只有两个字段，一个是DepartmentCode，另一个是CodLength，猜的意思是第一个存储是TreeView的位置信息，如01是第一大类，0101是第一大类的第一个分支，0102是第一大类的第二个分支，以此类推。CodLength存储的是TreeView的显示取值。