cxgrid 刷新数据后原来的显示位置不变

var i,ti:integer;
begin
  i:=cxGrid1DBTableView1.Controller.FocusedRowIndex;  //记录焦点行号
  ti:=cxGrid1DBTableView1.Controller.TopRowIndex;     //记录顶行号
  数据集.Active:=False;
  数据集.Active:=True;
  try
    cxGrid1DBTableView1.Controller.FocusedRowIndex:=i; //焦点行定位到记录值
    cxGrid1DBTableView1.Controller.TopRowIndex:=ti;    //顶行 定位到记录值
  except
  end;
end;

DataController.RefreshExternalData; //刷新数据集

cxGridDBDataDefinitions;
TcxGridDBDataController(DataController).DataSet.Refresh;