如何判断DBGrid1是否有选定行

Question

我的DBGrid1设定为每次只能选定一行，在用户点击某行时，修改按钮为TRUE
请问在保存修改前想判断一下，是否DBGrid1有选中行，语句如何写

Answer 1

btmodi.enable :=not dbgrid1.datasource.dataset.IsEmpty;

Answer 2

dbgrid1.datasource.dataset.IsEmpty
是判断有没有数据，而不是有没有选中行

Answer 3

//DBGrid只要有数据就都有选中的行～～
procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);
begin
  ButtonEdit.Enabled := TDataSource(Sender).DataSet.CanModify and
    not (dsEdit = TDataSource(Sender).DataSet.State);
end;