naja, soo schwer ist das doch nicht:
umgangssprachlich:
geht:
Delphi-Quellcode:
{Als Farbe wähle grau} sgNr.Canvas.brush.Color := clGray;
{Male das Rechteck aus} sgNr.Canvas.FillRect (Rect);
(Gebe Text aus} sgNr.Canvas.TextOut(rect.Left,rect.Top,sgNr.Cells [ACol,ARow]);
{Ruf die Vorfahrfunktion auf - die malt das
ganze Feld nochmal mit der Farbe grau } inherited;
Das heißt eigentlich reicht
Delphi-Quellcode:
sgNr.Canvas.brush.Color := clGray;
inherited;
und der zweite code geht nicht:
Delphi-Quellcode:
{male das rechteck normal} inherited; // rechtsbündig ist aus Vorgänger
{setze farba auf grau - die farbe des hintergrunds ändert sich dadurch noch nicht, da
der hintergrund hier nicht gezeichnet wird!} sgNr.Canvas.brush.Color := clGray;
{jetzt male das rechteck aus, also übermale alles was mit inherited gemalt wurde} sgNr.Canvas.FillRect (Rect);
{und nun gib text aus} sgNr.Canvas.TextOut(rect.Left,rect.Top,sgNr.Cells [ACol,ARow]);
jetzt klar?