Einzelnen Beitrag anzeigen

HolgerCW

Registriert seit: 28. Nov 2006
Ort: Marl
1.207 Beiträge
 
Delphi XE7 Enterprise
 
#1

StringGrid -> Beim Zeichnen, auch Zellen mit Text füllen

  Alt 8. Nov 2007, 12:07
Hallo zusammen,

ich möchte wenn das Grid gezeichnet wird auch die Zellen dementsprechend mit Text füllen.

wenn ich im Ereignis onDrawCell folgendes mache:

Delphi-Quellcode:
Canvas.Brush.Color := clInfoBK;
Canvas.FillRect(Rect);
Cells[ACol, ARow] := 'Test'; // <- Das bringt die Zelle zum flackern
Canvas.TextOut(Rect.Left+2, Rect.Top+2, Cells[ACol, ARow]);
Nur wenn ich das wie oben mache, flackern alle Zellen, wo ich Text rein schreiben. Was kann ich tuen ?

Gruss

Holger

P.S.: Möchte das gerne in dem Ereignis onDrawCell machen, da ich dort schon viel berechne um die Zellen zu ermitteln, wo sich die Farbe ändern soll und nun auch der Text ergänzt werden soll.
  Mit Zitat antworten Zitat