Delphi StrToTime (38:30:00)

Thema durchsuchen

Ansicht

Themen-Optionen

StrToTime (38:30:00)

Ein Thema von No Voices · begonnen am 24. Mär 2004 · letzter Beitrag vom 25. Mär 2004

Antwort

Leuselator

Registriert seit: 18. Mär 2003
Ort: Berlin
589 Beiträge

Delphi 8 Architect

Re: StrToTime (38:30:00)

24. Mär 2004, 08:20

Du mußt Dir eine eigene StrToTime-Funktion schreiben.
TDatetime speichert Datum und Zeit als Double in der Form:

Vorkommawert.Nachkommawert

Wobei der Vorkommawert die Tage seit dem 30.12.1899 wiedergibt
und der Nachkommawert die Millisekunden seit 0 Uhr.

38 Stunden (wie alles über 24 Stunden) führt zu einem Konverterror.

Du müßtest also die Stunden div 24 teilen, den erhaltenen Wert als Vorkommawert benutzen (sind ja dann ganze Tage) und dann Stunden mod 24 + Minuten+Sekunden+MilliSekunden als Nachkommawert. Dazu brauchst Du nur den String an den Doppelpunkten zu teilen und dann kannst Du loslegen.
Gruß

Tim Leuschner
Programmierer = moderner Sysiphos: stets wenn er meint, den Stein seiner Dummheit auf den Berg des Wissens gewuchtet zu haben, erblickt er einen völlig neuen Aspekt und der Dummfels poltert mit Getöse zurück ins Tal der Unwissenheit...