Foros Club Delphi - Crear calendario con StringGrid

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)

- - Crear calendario con StringGrid (https://www.clubdelphi.com/foros/showthread.php?t=81237)

Crear calendario con StringGrid

Buenas a todos, estoy un poco (por no decir bastante) perdido para crear con un StringGrid un calendario. El diseño en el que lo quiero hacer es que salga en el titulo de las columnas: 01/10/2012, 02/10/2012, 03/10/2012, 04/10/2012, etc. Pero que en la primera columna aparezca la fecha actual.

Por otro lado también me gustaría que me facilitarais, como es un calendario personalizado y voy a trabajar con un base de datos, quiero que me salga todos los nombres en cada fila, es decir, si tengo 20 registros que aparezcan 20 filas (21 contando con la del titulo de fecha) en cada fila el nombre.

Tengo hecho esto, pero no me sale todos los nombres y la fecha no sé como ponerlo.

Código:

   for(int i=1; i<=31; i++)

   {

      StringGrid1->ColCount = i;

      StringGrid1->Cells[i][0]= i;



      StringGrid1->RowCount = XDatos->QCatalogos->RecordCount + 1;

      for(int j=0; j<=XDatos->QCatalogos->RecordCount; j++)

      {

         while(!XDatos->QCatalogos->Eof)

         {

            //ShowMessage(XDatos->QCatalogosTitulo->Value);

            StringGrid1->Cells[0][j+1] = XDatos->QCatalogosTitulo->Value;

            XDatos->QCatalogos->Next();

         }

      }

   }

No te recomiendo para nada un StringGrid, para mí son obsoletos y nada prácticos.

si usas las nuevas versiones de Delphi tienes el TFlowPanel (creo recordar) es un panel que acepta controles dentro. En tiempo de ejecución puedes crear 30 paneles y hacer lo que quieras con ellos.

Lo suyo, es tener un solo panel y ahora pintar líneas y texto encima (es lo más rápido, eficiente y aconsejado), pero la desventaja es que puede ser muy tedioso para tí, por lo que usar 31 paneles puede ser más cómodo, rápido y fácil de tunear.

Yo partiría creando un Frame (File -> new > frame), donde pondría un label con la fuente que quisiera, la alineación, etc... Después puedes crear 31 instancias de ese frame y situarlo en pantalla.

Hola borlandpablo.

Cita:

Usando un StringGrid:

Código:

...

#include <DateUtils.hpp>

...

void DoTitle(TStringGrid *Grd, TDate aDate) {

  int tDays = DaysInAMonth(YearOf(aDate), MonthOf(aDate));

  int dHoy = DayOf(aDate);

  /* tantas columnas como días tenga el mes */

  Grd->ColCount = tDays;

  /* poner fechas en título */

  TDate Fecha = aDate;

  Fecha = IncDay(Fecha,-DayOf(aDate));

  int cc = 1;

  for(int i=1; i <= tDays; i++) {

    Fecha = IncDay(Fecha);

    if (i == dHoy) /* si fecha actual a 1er columna */

      Grd->Cells[0][0] = FormatDateTime("dd/mm/yyyy", aDate);

    else

      Grd->Cells[cc++][0] = FormatDateTime("dd/mm/yyyy",Fecha);

  }

}

Llamada ejemplo:

Código:

DoTitle(StringGrid1, StrToDate("21/04/2012"));

Por supuesto que si dispones del componente que menciona Lepe, con toda seguridad sea más sencillo de realizar lo que estas buscando.

Y por favor recuerda que el punto 8 de la guía de estilo, deja en claro que sólo se debe realizar una pregunta por hilo.

Saludos. :)