Ir al contenido


Foto

Uso DrawGrid o StringGrid


  • Por favor identifícate para responder
No hay respuestas en este tema

#1 jacapu

jacapu

    Member

  • Miembros
  • PipPip
  • 46 mensajes

Escrito 18 abril 2016 - 07:07

Hola, estoy intentando programar un StringGrid en Delphi7 y no lo consigo.

Os cuento mi problema:

Tengo un StringGrid al que lleno las celdas con cadenas concatenadas desde una Query. A cada cadena le añado "#13" al final, (para que me muestre cada cadena en una línea diferente dentro de la celda del StringGrid), y guardo el valor en una variable de tipo string que es la que paso a la celda. El problema es que en cada celda la cantidad de cadenas concatenadas puede ser distinta o ninguna.

En el evento OnDrawCell tengo el código que adjunto y funciona sólo para las primeras 3 filas de datos de la rejilla, pero necesito 6 filas de datos, (las tres primeras filas de datos funciona bien, pero las tres ultimas las deja en blanco con la altura por defecto).

Resumiendo, necesito que cada fila de la rejilla adapte su altura a la celda que más frases concatenadas tenga dentro de su fila y que en caso de que una fila tenga todas sus celdas en blanco mantenga la altura por defecto seleccionada en tiempo de diseño.

Tambien lo he intentado con un DBGrid y no anda.

A la rejilla le he seleccionado las opciones de goRowSizing y goColSizing en tiempo de diseño. 

 

Archivos adjuntos


  • 0