No permitir seleccion con el mouse (dbGrid)

[*Caro*]

Hola a todos

Como puedo hacer para que en una celda que esta en modo de edición de mi dbGrid, no le permita al usuario hacer la selección con el mouse sobre el contenido de dicha celda, me pueden dar una idea por favor, he buscado la forma de hacerlo y no lo he podido conseguir.

Por ejemplo en un edit si hago lo siguiente, hace lo que quiero, no permite seleccionar con el mouse dentro del edit

Código Delphi [-]
procedure TForm1.Edit1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  if ssLeft in Shift then
    edit1.SelLength := 0;
end;

pero en un dbGrid como lo haria, ya que el dbGrid no tienen un SelLength, para determinar la selección.

Muchisimas gracias por adelantado y que tengan un bonito dia.

[Ñuño Martínez]

Hace mucho que no utilizo la VCL pero, ¿no hay un "OnFocus" en ese control? Si lo tiene, tal vez puedas utilizarlo para rechazar el foco de entrada.

[*Caro*]

Hola Ñuño Martínez muchisimas Gracias por responder, pero no tiene un OnFocus el dbgrid

Saludos