Schriftart einer Zeile von DBGrid "fett markieren"

[Sharky]

Zitat von TypusMensch:

....., aber es ändert sich dabei nicht automatisch das DBGrid (jetzt auf einer Abfrage-Query gesetzt) mit. Auch nicht, wenn ich beim Klicken von der Checkbox mittels DBGrid1.Refresh oder DBGrid1.Repaint...

Bei mir geht es. Aber achtung! Wenn Du "nur" auf deine DBCheckBox klickst passiert noch nichts weil die Änderungen noch nicht sofort in die DB eingetragen werden. Dies passiert erst beim Scrollen in deinm Grid.

Nehme einfach eine normale CheckBox und diesen Code:

Delphi-Quellcode:

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
 Query1.Edit;
 Query1.FieldByName ('markiert').AsBoolean := Not (Query1.FieldByName ('markiert').AsBoolean);
 Query1.Post;
 DBGrid1.Refresh;
end;

procedure TForm1.Query1AfterScroll(DataSet: TDataSet);
begin
 CheckBox1.OnClick := nil;
 CheckBox1.Checked := Query1.FieldByName ('markiert').AsBoolean;
 CheckBox1.OnClick := CheckBox1Click;
end;