Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)
-   -   Moverme verticalmente con un TDbGrid (https://www.clubdelphi.com/foros/showthread.php?t=60258)

Jose Roman 25-09-2008 20:45:48

Moverme verticalmente con un TDbGrid
 
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 25-09-2008 20:49:59

Cita:

Empezado por Jose Roman (Mensaje 316361)
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


La franja horaria es GMT +2. Ahora son las 11:03:44.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi