canvas vor stringgrid

[Lannes]

Hallo,

ich würde das auch mit einer Ereignisbehandlungs-Routine in OnDrawCell lösen.
Ein Beispiel zum ausbauen:

Delphi-Quellcode:

  if (ARow = 3) and (ACol >= StringGrid1.FixedCols) then
    begin
    StringGrid1.Canvas.Pen.Color := clRed;
    StringGrid1.Canvas.Pen.Width := 2;
    StringGrid1.Canvas.MoveTo(Rect.Left,Rect.Bottom);
    StringGrid1.Canvas.LineTo(Rect.Right,Rect.Bottom);
    end;