Kleine Nachfrage: weiß jemand, wie ich alle Felder einer Spalte bearbeiten kann?
Hintergrund: ein Kurs findet normalerweise z.B. 4mal pro Woche statt, dh. ich erzeuge 4 Checkbox-Spalten. Es kann aber z.B. sind dass es in der aktuellen Woche nur 2 Termine gibt - da ich auch "Fehlanzeige" speichern möchte, darf ich also nicht blind durch alle Spalten gehen, sondern muss es ermöglichen, dass man z.B. Spalte 3 und 4 disabled.
Bearbeiten kann ich mit column.readonly := true blocken, das geht locker.
Aber nun möcht ich noch, dass alle evtl gesetzen Haken dieser Spalte wieder gelöscht (dh. auf feld.asboolean := false und zudem idealerweise die ganze Spalte angegraut wird. Das könnte schön über OnTitleClick erfolgen, dachte ich.
Also in der Art:
Delphi-Quellcode:
procedure TmeinForm.smdb_KursabsenzenTitleClick(Column: TColumn);
if Column.ReadOnly = false then begin
//UncheckAll(smdb_Kursabsenzen, Column); <- Versuch, klappt aber nicht
Column.ReadOnly := true;
Column.Color := clblue;
end else begin
Column.ReadOnly := false;
Column.Color := clwhite;
end;
Leider klappt auch das Setzen der Farben nicht.
Hat jemand dazu vielleicht nen Hinweis...?
Danke!
Ich w