Parece q los problemas no terminan con un Grid

Oxa78 · #1 26-10-2005

A mi jefe se le ocurre y parece q esta loco....

Utilizo Delphi 7 Enterprise + Componentes InfoPower + SQL Server 2000

Tengo un Grid con muchas columnas, especificamente las columnas son los dias de un mes seleccionado, osea son entre 28 y 31 columnas.

Problema : Quiero guardar la ultima columna del grid donde se ubico el cursor, esto es facil Guardo la posición del Grid tomando el valor de grid.selectedindex y lo guardo en la BD. Luego al cargar el grid le asigno el valor guardado y le hago un setfocus al grid y punto. Entonces cual es el problema?, mi jefe quiere q la columna guardada sea la primera q se vea en el grid, es decir si la columna guardada es la 25, entonces inicialmente, la primera columna q se vea debe de ser la 25.

Cuando se hace la asignación de la posción de la columna guardada esta se visualiza al centro del grid o aparentemente no tiene una ubicación fija o coherente.

Ese es mi problema. Espero tener algo de suerte y encontrar alguna ayuda con ustedes... de lo contrario gracias de todas formas por leer el mensaje.

Gracias de antemano

vtdeleon · #2 26-10-2005

Saludos
Este link no resuelve tu caso, pero date una vuelta por ahí y captaras el mensaje

http://www.clubdelphi.com/foros/showthread.php?t=26476

roman · #3 26-10-2005

Cita:

Empezado por vtdeleon

Este link no resuelve tu caso, pero date una vuelta por ahí y captaras el mensaje

http://www.clubdelphi.com/foros/showthread.php?t=26476

¡Aghhh! Y yo que me pasé cinco minutos buscando la respuesta (y la encontré)

// Saludos

Oxa78 · #4 26-10-2005

ok, gracias por la respuesta.

roman · #5 26-10-2005

La respuesta, espero no equivocarme porque ahora la escribo de memoria, es:

Código Delphi [-]type
  THackGrid = class(TDBGrid);

...

THackGrid(DBGrid1).LeftCol := 25;

Es decir, la propiedad que buscas es LeftCol, pero como es una propiedad protegida, utilizas el truco de desprotección.

// Saludos

Oxa78 · #6 26-10-2005

Gracias, muchas gracias solucionaste mi problema.