DBGrid with MultiSelect

发现在delphi.about.com上看了不少实用的方法，但很快就忘记了。还是自己做一些筛选以及记录，好让日后查找方便

http://delphi.about.com/od/usedbvcl/l/aa032503a.htm

dbgrid1.options: = dbgrid1.options + dgMultiSelect; // allow MultiSelect
..

If DbGrid1.selectrows > 0  the
begin
   with  DBGrid1.datasource.dataset  do
      begin
         for  i: = 0   to  DBGrid1.selectrows.count - 1   do
          begin
          gotobookmark(Pointer(DBGrid1.selectrows.items[i])); // use gotobookmark
           // do .
          end ;
      end ;  
end ; 

转载于:https://www.cnblogs.com/samsonleung/archive/2008/07/01/1233565.html