Moverme verticalmente con un TDbGrid

[Jose Roman]

Hola a todos, resulta que tegno un TDbGrid el cual tiene 4 columnas, lo que deseo saber es si estando en la columna 2 y al presionar la tecla ENTER en cualquier fila me avance a la fila siguiente pero en la misma columna (en este caso la 2) y cuando este en la ultima fila simplemente se ubique en la columna 3 fila 1. Gracias espero no sea complicado

[[egostar]]

Empezado por Jose Roman

Hola a todos, resulta que tegno un TDbGrid el cual tiene 4 columnas, lo que deseo saber es si estando en la columna 2 y al presionar la tecla ENTER en cualquier fila me avance a la fila siguiente pero en la misma columna (en este caso la 2) y cuando este en la ultima fila simplemente se ubique en la columna 3 fila 1. Gracias espero no sea complicado

Hola,

Tal vez si usas el evento OnKeyPress del DBGrid te funcione.

Código Delphi [-]
}
procedure TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if key = 13 then
     //Key := vk_Right; // esto no es lo que deseas.
     Key := vk_Tab; //Con esto solucionas tu problema.
end;

Salud OS