Danke für die schnelle Antwort. Hab jetzt folgenden Code:
Delphi-Quellcode:
procedure StringGrid1.DrawCell(Sender: TObject; Acol, ARow : Integer;
Rect:TRect; State:TGridDrawState);
begin
if Acol = 4 then
begin
Canvas.Pen.Color:=clblack;
Canvas.Pen.eidth:=3;
Canvas.moveto(Rect.Left,Rect.Top);
Canvas.Lineto(Rect.Left,Rect.Bottom);
end;
Allerdings verstärkt er nicht die Linie im Stringgrid, sondern zeichnet eine Linie, die dann quasi vom Grid verdeckt wird. Was soll ich denn jetzt machen?
