Por qué hacerlo fácil se si puede hacer complicado, no es verdad ?
Todo mi comentario anterior se puede olvidar y resumir el asunto en esto :
Código Delphi
[-]procedure TForm1.DBGrid1ColEnter(Sender: TObject);
begin
DBGrid1.BeginDrag(False,10);
end;