怪问题一个！

Question

我界面有一个DBGrid，下面有相应的DBText
程序的功能理应是：DBText随着DBGrid的游标显示相应的记录内容（比如我鼠标点第三条记录，下边的DBText显示第三条记录的相应内容）
但是，失败！
症状：点Navigator的话，要移动到五条记录之后或之前，DBText才刷新显示游标所在位置的记录内容，不然一直是先前游标位置的记录内容。
我后台是Oracle数据库
用的三层结构
请高手指点！

Answer 1

是否设置的多选或没有主键------------------------
http://scsoft.agrie.com

Answer 2

我发现是这个事件在作怪！不要下边得事件就运行良好，但是DBGrid里是显示得A或B。
大家觉得我这个事件有什么处理不得不好吗？请指教！
procedure Tfrmproportionquest.allDBGridDrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn;
  State: TGridDrawState);
var status:string;
begin
  basedatamodule.rwlxdict.Active:=true;
  basedatamodule.tcyszjhClientDataSet.edit;
  status:=basedatamodule.tcyszjhClientDataSet.fieldbyname('任务类型').asstring;
  if status='A' then
    begin
      basedatamodule.tcyszjhClientDataSet.FieldByName('任务类型').asstring:='计划任务';
    end
  else  if status='B' then
    begin
      basedatamodule.tcyszjhClientDataSet.FieldByName('任务类型').asstring:='临时任务';
    END;
end;