如何判断DBGrid中显示的记录是否被选中？

Question

如何判断DBGrid中显示的记录是否被选中？应该用那个函数判断？

Answer 1

var  
  sBookMarkList :TBookList;
  bBookMark :TBook;
  i :Integer;
begin
      begin 
        DisableControls;
        bBookMark :=GetBook;
        sBookMarkList :=DBGrid1.SelectedRows;
        try
          for i:=0 to sBookMarkList.Count-1 do
          begin
             被选中的记录
          end;
        finally
          GotoBook(bBookMark);
          FreeBook(bBookMark);
          EnableControls;
        end;
      end;