Danke, bin vor einer Minute selbst auf DEINE Lösung gekommen,...... fast.
Ich habe es so gemacht:
Delphi-Quellcode:
begin
Canvas.Brush.Color := clLime;
TStringGrid(Sender).Objects[aCol,aRow] := Pointer(clLime);
Canvas.Font.Color := clBlack;
Canvas.Font.Style := [fsbold];
Canvas.TextRect(Rect, Rect.Left + 2, Rect.Top + 2, cells[acol, arow]);
Canvas.FrameRect(Rect);
end;
Das geht wohl auch mit StringGrid1.Objects statt TStringGrid(Sender).Objects und
beim Pointer mit (clLime) oder eben mit (Canvas.Brush.Color) aber,
die gefärbte Zelle flimmert dann extrem, in allen Fällen.
Das war vorher nicht.
Wie bekomme ich das weg?