Delphi DBGrid -> Zeilenkopf farblich ändern

Thema durchsuchen

Ansicht

Themen-Optionen

DBGrid -> Zeilenkopf farblich ändern

Ein Thema von HolgerCW · begonnen am 10. Jan 2013 · letzter Beitrag vom 10. Jan 2013

Vorheriger Beitrag

Nächster Beitrag

HolgerCW

Registriert seit: 28. Nov 2006
Ort: Marl
1.207 Beiträge

Delphi XE7 Enterprise

AW: DBGrid -> Zeilenkopf farblich ändern

10. Jan 2013, 10:45

Hallo,

habe so angefangen:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TFOrm1.DBGrid1DrawColumnCell(Sender: TObject;

  const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState);

begin

 if (DataModule1.Query1['PLANUNGSTERMIN'] < Date) AND (Column.FieldName = 'PLANUNGSTERMIN') then

 begin

  DBGrid1.Canvas.Brush.Color := clyellow;

  DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);

 end;

end;

So ändere ich die Farbe in einer Zelle, nur wie mache ich das mit der fixierten Zelle ganz links ?