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]

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.

}
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