【结】[请求]DataGrid光标问题

qwermsn

我数据集有复合材料，和复合明细的信息。

数据如下：
复合材料A （B+C）
复合明细 B
复合明细 C

想实现效果：修改B或C材料，填充A的值
目前方法：  DataGrid的OnEdited事件，触发编辑材料明细时候，数据集过滤，循环，明细的值加起来填到A那边去。
出现问题：  当数据超过一屏幕的时候 有光标错位的问题

参考帖子http://bbs.justep.com/forum.php? ... ght=DisableControls
使用类似如下代码：

procedure TMAINFORM.DataSetBroker1DataChange(Sender: TObject; Field: TDataField);
var lBookMark :String;
begin
    if Field<>nil then
    begin

        if Field.FieldName='XZ' then
        begin
            DataSetBroker1.DataSet.DisableControls;
            lBookMark := DataSetBroker1.DataSet.Bookmark;
            DataSetBroker1.DataSet.First;
            while not  DataSetBroker1.DataSet.Eof do
            begin
                DataSetBroker1.DataSet.Next;
            end;
            DataSetBroker1.DataSet.Bookmark :=lBookMark;
            DataSetBroker1.DataSet.EnableControls;

        end;
      //  DataSetBroker1.DataSet.First;

    end;
end;

当数据超过一屏幕的时候 有光标错位的问题，请帮忙想下办法

atiger

你把DataGrid 的 TDataGridOptionDB  的 edgoLoadAllRecords 选中看看

qwermsn

试验了下。。。没有用。。

atiger

抱歉，我没有注意看你的连接，不过连接中已经写了，好像没有好的方法了，

qwermsn

额，谢谢。。那就结贴。。