Hallo zusammen,
ich muss in einer Anwendung 12 DBCheckboxen (Januar - Dezember) einfügen. Eine Umstellung auf normale Checkboxen wird sehr schwierig, da die ganze Anwendung auf die
DB-Komponenten ausgelegt ist. Wie kann ich die Werte der DBCheckboxen am geschicktesten in einem Feld in einer Datenbanktabelle abspeichern ? Als Ergebnis sollte folgendes rauskommen :
Zitat:
011110000111
Der Grund für das Ergebnis ist eine vereinfachte Abfrage für die Monate. So könnte ich bei dem Ergebnis hergehen und einfach folgendes abfragen :
Delphi-Quellcode:
procedure TForm6.FormCreate(Sender: TObject);
var
I: Integer;
begin
for I := 1 to Length(DBFeldMonate) do
begin
case StrToInt(DBFeldMonate[i]) of
0 : // Aktion für False
1 : // Aktion für True
end;
end;
end;
DBFeldMonate enthält zum Beispiel das Ergebnis aus dem Zitat als String. Wie bekomme ich die Werte der 12 DBCheckboxen in so ein Ergebnis ?