[barakuda]

Gracias por tu rapida respuesta mira de paso me dao cuenta que si mientras estoy editando una celda juego con la ruleta del raton el foco me baja o sube sobre la columna donde estoy editando permitiendome tambien editar esa otra celda, para correguir eso lo que hago es insertar la esencia del codigo en el evente ONMouseWheel

Código Delphi [-]
procedure TAnadir.DBGrid10MouseWheel(Sender: TObject; Shift: TShiftState;
  WheelDelta: Integer; MousePos: TPoint; var Handled: Boolean);
begin

        Form1.Anadir1.DBGrid10.Options := Form1.Anadir1.DBGrid10.Options +
          [dgCancelOnExit] - [dgEditing];
        Form1.ADOTable2.Cancel;
        Form1.Anadir1.DBLookupComboBox4.Enabled := False; // {OFICINA}
        Form1.Anadir1.DBLookupComboBox5.Enabled := False; // {TIPO DE RED}
        Form1.Anadir1.DBCheckBox12.Enabled := False; // {OCUPADA}
        Form1.Anadir1.DBCheckBox13.Enabled := False; // {ACTIVADA}
        Form1.Anadir1.DBCheckBox14.Enabled := False; // {ESTADO}
        Form1.Anadir1.BitBtn8.Enabled := False; // [APLICAR]
        Form1.Anadir1.BitBtn9.Enabled := False; // [CANCELAR]
        Form1.Anadir1.BitBtn1.Enabled := True; // [NUEVO]
        Form1.Anadir1.BitBtn10.Enabled := True; // [EDITAR]
        // ********** FIN del Bloque **********

end;

y ahora con solo usarla ya sea para subir o bajar automáticamente me cancela cualquier modificación que yo aya echo, eso es lo que me interesaria que hiciese al cambiar de fila pero no hay manera ...