Einzelnen Beitrag anzeigen

Mr.borland

Registriert seit: 16. Mai 2007
Ort: Plüderhausen
34 Beiträge
 
#1

Korrespondenz problem- StrToTime und TimeToStr

  Alt 12. Mär 2008, 14:53
ich habe fogendes problem:

zu bestimmten ereignissen schreibe ich die zeit millisekunden genau in eine textdatei (wandle Time to string ) und später möchte ich statistik daruber führen (wandle string to time ). doch da passiert etwas nicht naturliches.

Delphi-Quellcode:
procedure TForm1.test2;
var t1,t2: TDateTime;
begin
  t1 := StrToTime('15:0:34,500', FormatSettings);
  Caption := TimeToStr(t1,FormatSettings);
  t2 := StrToTime(Caption, FormatSettings); !!!! hier passiert der fehler. !!!!

end;
mir ist folgendes aufgefallen: StrToTime bekommt den string als 'hh:nn:ss,zzz' aber TimeToStr liefert mir einen string der 'hh:nn:ss:zzz' formatiert ist.
also korrespondieren die zwei funktionen nicht miteinander?!
woran liegt das?

mein FormatSettings sieht wie folgt aus:
Delphi-Quellcode:
  GetLocaleFormatSettings(LOCALE_USER_DEFAULT, FormatSettings);
  FormatSettings.TwoDigitYearCenturyWindow := 1;
  FormatSettings.DateSeparator := '.';
  FormatSettings.TimeSeparator := ':';
  FormatSettings.ShortTimeFormat := 'hh:nn';
  FormatSettings.LongTimeFormat := 'hh:nn:ss:zzz';
  FormatSettings.ShortDateFormat := '';
  FormatSettings.LongDateFormat := '';
danke für eure hilfe.
  Mit Zitat antworten Zitat