Saber o Foco dentro de um DbGrid

Para isso vamos usar a propriedade SelectedIndex que retorna o número da coluna. Veja um exemplo:

procedure Tform1.DBGrid1ColEnter(Sender:TObject);
begin
Edit1.Text := IntToStr(DBGrid1.SelectedIndex);
end;