怎么写语句把DBGrid的所有行都选中?

Question

怎么写语句把DBGrid的所有行都选中?

Answer 1

在DBGrid的KeyDown事件中判断是否同时按下了Ctrl+A，如果是，则执行全选，
选择全部数据的功能我使用循环的办法，即与DBGrid连接的DataSet从头到尾
过一遍，类似于下面的程序，不知道别人还有没有更好的办法？
假设DBGrid连接的是Query，则：
    Query.First;
    while not Query.EOF do
    begin
      DBGrid.SelectedRows.CurrentRowSelected := True;
      Query.Next;
    end;
当然，前提是DBGrid的Options属性中dgMultiSelect属性设置为True。

Answer 2

DBGrideh1.SelectedRows.SelectAll;例子里的