Hallo,
habe es erweitert:
Delphi-Quellcode:
if (gdSelected in State) then
begin
DBG_WorkFlow_GruppenBau.Canvas.FillRect(Rect);
DBG_WorkFlow_GruppenBau.Canvas.Font.Style := DBG_WorkFlow_GruppenBau.Canvas.Font.Style + [fsBold];
DBG_WorkFlow_GruppenBau.Canvas.Font.Color := clBlack;
DBG_WorkFlow_GruppenBau.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end
else
begin
DBG_WorkFlow_GruppenBau.Canvas.Font.Style := DBG_WorkFlow_GruppenBau.Canvas.Font.Style - [fsBold];
DBG_WorkFlow_GruppenBau.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
.. aber es ändert sich nichts ...
Der DrawingStyle des DBGrids ist auch gdsGradient. Liegt es eventuell daran ?