Registriert seit: 28. Sep 2006
198 Beiträge
Delphi XE Professional
|
Re: Anzahl Stunden berechnen
21. Aug 2009, 11:13
Hi,
Du könntest ein Array[0..1439] of Integer machen und in jedes Feld eintragen, mit welchem Faktor die jeweilige Tagesminute zu bewerten ist. Wahlweise auch für eine ganze Woche, dann ist es ein Array[0..10079]. Geschickterweise baust Du Dir noch eine Zugriffsfunktion, in der Du nicht die Minute angibst, sondern Wochentag, Stunde, Minute oder halt TDateTime.
Ja, das klingt aufwändig, aber zum einen sind das grad 20-40 kByte und du musst sie nur einmal füllen. Danach ratterst Du in einer for-Schleife vom Startzeitpunkt bis zum Endzeitpunkt über jede Minute hinweg und addierst die Bewertungen auf.
Achtung: für eine Zeiterfassung hat sich (bei mir!) TTime bzw. TDateTime als sehr fehleranfällig herausgestellt. Ich speichere das Datum als TDate und die Start- und Stoppzeiten getrennt als Integerwert, also genau von 0 (als 00:00) bis 1439 (als 23:59).
Viel Spaß!
|