Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   OOP (https://www.clubdelphi.com/foros/forumdisplay.php?f=5)
-   -   Desplazamiento horizontal en una rejilla (https://www.clubdelphi.com/foros/showthread.php?t=14472)

sur-se 21-09-2004 19:40:45

Desplazamiento horizontal en una rejilla
 
Hola. Tengo una DBGrid en pantalla con RowSelect = True. Con las teclas de cursor puedo desplazarme arriba/abajo, pero no izqda/dcha para visualizar el resto de las columnas que no caben al ancho y quedan ocultas, teniendo que coger el ratón para efectuar ese desplazamiento. ¿Existe alguna forma de desplazar los campos de una DBGrid horizontalmente mediante un mensaje o método?
Salu2.

roman 21-09-2004 20:55:18

Intenta esto en el evento OnKeyDown del DBGrid:

Código Delphi [-]
  if Key = VK_RIGHT then
  begin
    DBGrid1.Perform(WM_HSCROLL, SB_PAGERIGHT, 0);
    Key := 0;
  end
  else if Key = VK_LEFT then
  begin
    DBGrid1.Perform(WM_HSCROLL, SB_PAGELEFT, 0);
    Key := 0;
  end;

// Saludos

Coco_jac 26-06-2006 15:48:09

Hola Roman, tengo un problema parecido, probe con lo que mencionas, pero me sale un error :

Identificador NO definido : WM_HSCROLL

Espero tus comentarios.
Gracias.


La franja horaria es GMT +2. Ahora son las 07:46:05.

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