![]() |
AW: Status von 12 DBCheckboxen abspeichern in einer Datenbank
Zitat:
|
AW: Status von 12 DBCheckboxen abspeichern in einer Datenbank
Delphi-Quellcode:
type
TWorkMonth = (wmJanuary, wmFebruary, wmMarch, wmApril, wmMay, wmJune, wmJuly, wmAugust, wmSeptember, wmOctober, wmNovember, wmDecember); function WorkedThatMonth(aMonth: TWorkMonth; aBitmask: word): Boolean; begin Result := aBitmask and (1 shl Ord(aMonth)) <> 0; end; procedure TFormDings.ButtonBumsClick(Sender: TObject); var i: integer; begin for i := 1 to 12 do TCheckBox(FindComponent('Checkbox' + IntToStr(i))).Checked := WorkedThatMonth(TWorkMonth(i - 1), 10); end; |
AW: Status von 12 DBCheckboxen abspeichern in einer Datenbank
Das schreit nach einer 1:n Struktur... (denk nur mal an die Folgejahre)
|
AW: Status von 12 DBCheckboxen abspeichern in einer Datenbank
Zitat:
|
AW: Status von 12 DBCheckboxen abspeichern in einer Datenbank
Ich habe möglicherweise falsche Vorstellungen von Deinen Daten und dem was Du tust.
-Erfasst Ihr die Arbeitszeiten oder Tage pro Mitarbeiter? (dann wären die Checkboxen hinfällig) -Wird die Abrechnung monatlich durchgeführt? (dann gäbe es eine Tabelle mit MA,Abrechnungsdatum,Betrag etc.) -wo und wie werden die Daten der Abrechnungen über die Jahre gespeichert? möglicherweise habe ich ein zu komplexes Bild von der Datenbank ... |
AW: Status von 12 DBCheckboxen abspeichern in einer Datenbank
Ich kenne das so:
In einer Tabelle stehen Leistungen, also z.B. für jeden Tag ein Eintrag (Mitarbeiter, Datum,Kommen-Zeit, Gehen-Zeit, Pause etc.) Am Monatsende werden aus der Leistungstabelle alle noch nicht in Rechnung gestellten Einträge extrahiert und daraus pro Mitarbeiter eine Rechnung erstellt. Fertig. Die Information, ob ein Mitarbeiter im Juni gearbeitet hat (Juni 2012) ergibt sich aus der Frage, ob es in der Leistungstabelle einen Eintrag gibt, dessen 'Datum'-Feld zwischen dem 1.6. und 31.6 liegt. |
AW: Status von 12 DBCheckboxen abspeichern in einer Datenbank
Am 31.6. sollte es schon mal keine Einträge geben.
;) |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:21 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz