Como selecionar tudo que há dentro de um DBGrid

Fala galera por favor veja se vocês podem me ajudar estou prescisando selecionar tudo que há dentro de um dbgrid quando é apertado um botão veja

procedure TFormOperacCorte.BitBtn2Click(Sender: TObject);

begin

TabCorteAcao.First

while not TabCorteAcao.Eof then

begin

//Aqui eu não sei o que coloco para ir selecionando até o final

end;

end.

POR FAVOR AJUDEM _ME

Título Editado!