Im
OnDrawCell-Ereignis kann man in die Zellen zeichnen.
Das wird für jede Zelle aufgerufen, wenn sie neu gezeichnet wird.
ACol und
ARow gibt die zu zeichnente Zelle an.
In
Rect steht die Position der Zelle im StringGrid1.Canvas.
Delphi-Quellcode:
Procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);
Begin
{es wird jede Zelle in der 5. Spalte und 3. Zeile rot gefüllt}
If (ACol = 4) or (ARow = 2) Then Begin {Abfrage ob rot ausgefüllt wird}
StringGrid1.Canvas.Brush.Color := clRed;
StringGrid1.Canvas.FillRect(Rect);
End;
End;