树的数据库操作--感兴趣的参与我的提问？ ( 积分: 200 )

我现在做一个资产管理系统，在做到资产信息即资料初装的时候遇到了问题：
问题是这样的： 我有资产信息一表，有id,zcbh,mch(内码，资产编号，名称等信息），树列出了所有的资产分类，当鼠标双击某一叶子分类的时候，系统在DBGrid中自动生成zcbh的编码，如PC0001,同时要求生成一个id(id是隐藏，不让用户看见的）,当我点保存的时候批量提交所有在DBGrid中录入的数据。但是出现了一些问题，我在按向下箭头的时候，下一条记录的id和zcbh是自动生成了，但是光标却停在了第三行而不是第二行。另外还有一些小的问题。出现此怪异的现象应该是我那里处理有问题吧。
我的这些需求相信打大家都明白了吧，还请高人指点，要完成这样的要求，最好在那个事件下处理比较好，请给我个思路，谢谢。

你可以考虑在接管的XXInsert事件中使用一个全局状态变量，以免在程序Insert时也触发
动作。例如：

var
InProgramInsert:Boolean=false;
procedure TXXX.XXInsert;
begin
if InProgramInsert then exit;
InProgramInsert:=true;
//在此按照你的规则填入数据，同时还可以适当的控制一下当前的RecNo
InProgramInsert:=false;
end;

先试试吧，不好用再说

我有你类似的操作办法，还是不行！

可以鎖定記錄行，就是了，新增前再打開這個鎖定，新增後再鎖定，就沒事了，

在按向下箭头的时候，只insert。在按确定或窗体退出时再post