Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by RSF,
29. Jan 2018
OK, hast du mein Beispiel aus #4 probiert
procedure TRechnungen.DBGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if (gdSelected in State) or (gdFocused in State) then
DBGrid1.Canvas.Font.Color := clBlue;
if DataModule2.Rechnung.FieldByName('Bezahlt').AsBoolean=True then
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by RSF,
29. Jan 2018
welches Grid Ereignis benutzt du DrawColumnCell ?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by RSF,
26. Jan 2018
Ich hoffe ich habe es richtig verstanden.
Ich mache es so:
procedure TRechnungen.DBGrid1DrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
begin
if (gdSelected in State) or (gdFocused in State) then