Problemas en StringGrid

[eennzzoo]

Hola tengo un problema con el tema de los colores en un StringGrid

Con este codigo pinto la primer fila que esta fija. Pero yo antes de este codigo escribi un titulo para la primer posicion con cells [0][0]="titulo" pero no aparece lo que escribi para esa fila. A menos que saque el siguiente codigo.

void __fastcall TfPeliculas::StringGrid1DrawCell(TObject *Sender, int ACol,
      int ARow, TRect &Rect, TGridDrawState State)
{
        if( State.Contains(gdFixed) )
 {
 StringGrid1->Canvas->Brush->Color = static_cast<TColor>(RGB(255, 155, 0));
 StringGrid1->Canvas->Font->Style = TFontStyles() << fsBold;
 StringGrid1->Canvas->Font->Color = static_cast<TColor>(RGB(250, 245, 135));

 StringGrid1->Canvas->Rectangle(Rect);

 }

[ecfisa]

Hola eennzzoo.

Te falta "reescribir" el texto:

void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,
      int ARow, TRect &Rect, TGridDrawState State)
{
  if (State.Contains(gdFixed)) {
    TCanvas *CV = static_cast <TCanvas*> (StringGrid1->Canvas);
    CV->Brush->Color = (TColor)(RGB(255,155,0));
    CV->Font->Style = TFontStyles() << fsBold;
    CV->FillRect(Rect);
    CV->TextOut(Rect.Left+1,Rect.top+1,StringGrid1->Cells[ACol][ARow]);
  }
}

Saludos

[eennzzoo]

Empezado por ecfisa

Hola eennzzoo.

Te falta "reescribir" el texto:

void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,
      int ARow, TRect &Rect, TGridDrawState State)
{
  if (State.Contains(gdFixed)) {
    TCanvas *CV = static_cast <TCanvas*> (StringGrid1->Canvas);
    CV->Brush->Color = (TColor)(RGB(255,155,0));
    CV->Font->Style = TFontStyles() << fsBold;
    CV->FillRect(Rect);
    CV->TextOut(Rect.Left+1,Rect.top+1,StringGrid1->Cells[ACol][ARow]); // <- aqui
  }
}

Saludos

Gracias faltaba el canvas antes del textout.