Problema TStringGrid dinámico y evento OnDrawCell

[[escafandra]]

No se muy bien porqué quieres modificar ese TRect, pero he cotilleado un poco las definiciones de los eventos y he visto esto:

El evento TDrawGrid::OnDrawCell de define asi:

typedef void __fastcall (__closure *TDrawCellEvent)(System::TObject* Sender, int ACol, int ARow, const Windows::TRect &Rect, TGridDrawState State);

Eso quiere decir que Rect siempre es un const TRect &.

He probado a usar el TStringGrid dinámicamente y me pasa lo que a tí, no me extraña pues espera una función con el const TRect &

Cuando lo uso como componente visual, es cierto que la definición del evento no requiere const TRect& pero lo que si ocurre es que si modificas el valor del Rect no tiene efecto entre llamada y llamada, a pesar de ser una referencia. Con lo que me inclino a pensar que a todos los efectos es una constante.

Pero repito, no se para que quieres modificar ese valor.

Saludos.

[[escafandra]]

Bueno te dejo un truco para que compile y tu función OnDrawCell no tenga const TRect &Rect:

Define un nuevo tipo de evento en la cabecera.h de tu form (o en otra incluida):

typedef void __fastcall (__closure *TDCE)(System::TObject *Sender, int ACol, int ARow,
           Windows::TRect &Rect, TGridDrawState State);

Define un puntero a ese tipo de evento en la definición de tu Form:

TDCE _DrawCell;

Y en OnCreate, por ejemplo, asigna tu función MiDrawCell de esta forma:

void __fastcall TForm1::FormCreate(TObject *Sender)
{
    // Asignación en dos pasos o no te deja...
    _DrawCell = MiDrawCell;
    SGrid->OnDrawCell = (TDrawCellEvent)_DrawCell;
    // Para luego visualizar el control, ya sabes....
    InsertControl(SGrid);
}

Espero que te ayude.
Saludos.

[waremovil]

magistral escafandra, muchas gracias te has tomado muchas molestias

al final me tuve que apañar cambiando la forma de dibujar trect que usaba

pero me apunto tu truco porque pienso que será muy útil cuando pelee con las redefiniciones de eventos



un saludo