var 
  a,b,c,d:TstringField;
 begin
    a:=DM.qSVCHACCT.fields[0] as TstringField;
    b:=DM.qSVCHACCT.fields[1] as TstringField;
    c:=DM.qSVCHACCT.fields[2] as TstringField;
    d:=DM.qSVCHACCT.fields[3] as TstringField;
 end;

解决方案 »

  1.   

    dbgrid光标所指纪录,就是当前纪录
      

  2.   

    a.value,b.value,c.value,d.value就是选中的字符串
      

  3.   

    DM.qSVCHACCT是什么?
    我试的时候DELPHI不认识啊!
      

  4.   

    DM.qsVCHACCT是一个query吧。他举一个例子而已。
    DBGRID的位置就是QUERY当前的位置。
      

  5.   

    DBGRID的位置就是QUERY当前的位置
    按需要在dbgrid的事件中进行操作即可
    如:onEnter中事件中就可以返回你要的一些记录的值