Text im DBgrid einfärben

[Sourcemaker]

???? Ich hatte gedacht Du wolltest DrawColumnCell nicht bemühen ? Oder ging es Grid.Canvas.Font.Color ? Ansonsten ist das der Standardweg den du da beschreibst.

Delphi-Quellcode:

procedure TForm_Main.DBGrid_MasterDrawColumnCell(Sender: TObject;
  const Rect: TRect; DataCol: Integer; Column: TColumn;
  State: TGridDrawState);

var Grid: TDBGrid;

begin
  Grid:= TDBGrid(Sender);

if 'Bedingung zum Ändern der Schriftfarbe' then
  begin
    Grid.Canvas.Font.Color:= clRed;                     // Text des akt. Feldes
    Grid.Canvas.TextRect(Rect,Rect.Left +2, Rect.Top +2,Column.Field.AsString);
  end

Gruß

Frank