Status von 12 DBCheckboxen abspeichern in einer Datenbank

[RWarnecke]

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 ?