dbgrid控件有selectedrows属性,这是一个数组,你可以通过
GotoBook(pointer(DBGrid1.SelectedRows.Items[i]))到达当前的选定的纪录,然后在操作,试试

解决方案 »

  1.   

    采用如下语句可以:
    if DBGrid1.SelectedField = nil then ...其中nil可以替换为你所定义的区域
      

  2.   

            if 
               (dbgrid1.SelectedIndex <> -1) and              
               (dbgrid1.datasource.dataset.Active) and             
               (dbgrid1.datasource.dataset.RecordCount > 0)  
            then ...
      

  3.   

    Flag := Tbooklist(DbGrid1.SelectedRows).CurrentRowSelected ;
    如果返回值为True表示选中,否则没有选中