TDBGrid y el scroll horizontal

[[Lepe]]

Se puede hacer casi todo lo que pides (no digo todo, porque no sé hacerlo yo ).

- Cortar el texto en varias lineas:
Pones la propiedad DefautlDraw a false y en el evento onDrawCell te encargas de averiguar el ancho de la celda (parámetro Rect:TRect de ese evento) y con dbgrid.canvas.textwidth(tabla1Campo1.AsString) puedes saber el ancho que necesita el texto para mostrarse, si no cabe, lo cortas en dos líneas, por supuesto deberás cambiar el alto de cada fila para que se vean 2 o 3 líneas, según necesites.

- El Hint sobre la celda, puede llegar a ser molesto, puede que el usuario no sepa donde poner el ratón para que el Hint no oculte el texto de detrás, dejando ese caso, podrías usar el evento OnColEnter (para actualizar el hint en cada cambio de columna) y el evento AfterScroll (para actualizar el hint en cada cambio de registro).

Incluso podrías usar una combinación de estos 2 métodos. Si el texto no excede de las 2 líneas, partes el texto. Si el texto es muy grande, muestras las dos primeras líneas, unos puntos suspensivos y como Hint el texto completo.

El TUltimGrid o TJvUltimGrid hace lo del Hint, es un componente gratuito que se incluyó en la JVCL, pero creo puede descargarse independientemente.

Saludos