Entwickler-Ecke

Delphi Language (Object-Pascal) / CLX - Problem bei der Umwandlug von DateTime in String


Coolman1974 - Do 15.12.05 13:03
Titel: Problem bei der Umwandlug von DateTime in String
Hallo zusammen,

ich habe das Problem, das mir die Umwandlung von DateTime in String nicht gelingen will.

Ich bekomme über eine WMI-Abfrage '20051215113543.973428+060' als DateTime-Typ geliefert.

Doch bei DateTimeToStr('20051215113543.973428+060) giebt es einen Fehler (ungültige Gleitkommaoperation).

Hat jemand eine Ahnung wie ich mit diesem Format umgehen muss?

Moderiert von user profile iconTino: Titel erweitert.


jasocul - Do 15.12.05 13:10
Titel: Re: Problem bei der Umwandlug von DateTime in String
Was du bekommst ist nicht vom Typ TDateTime:
20051215113543 = 2005 12 15 und noch irgendwas
Die Nachkommastellen habe ich mir jetzt nicht angesehen.
TDateTime ist ein Gleitkommatyp. Dort wird die Zeit ab einem Zeitpunkt angegeben. Dort steht kein Datum im Klartext drin.

Daher kann auch deine Umwandlung nicht funktionieren. Einen kleinen Ansatz habe ich dir ja schon gegeben.


Stefan.Buchholtz - Do 15.12.05 13:10
Dassieht nicht aus wie ein TDateTime. TDateTime ist die Anzahl der Tage seit dem 30.12.1899 - was du da hast, sieht aus wie eine Zahl, die sich einfach direkt aus Datum und Uhrzeit zusammengesetzt ist. Wäre 15.12.2005 11:35:43 plausibel? Dann musst du die Zahl selbst zerlegen - sollte ja nicht so schwierig sein.

Stefan


Coolman1974 - Do 15.12.05 13:16
Ja, das ist ja schon klar.

Der Typ den ich bekomme ist aber definitiv DateTime.

Schau mal hier "CreationDate" http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/win32_process.asp

Hier wird es als DateTime deklariert.


????


Coolman1974 - Do 15.12.05 13:20
Aber was bedeutet dann "973428+060" ???


Stefan.Buchholtz - Do 15.12.05 13:37
Schaust du hier: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/cim_datetime.asp

Stefan


jasocul - Do 15.12.05 13:41
Das Format DateTime vom MS hat nichts mit dem von Delphi zu tun. Dort heißt es ja auch TDateTime. :wink:


Coolman1974 - Do 15.12.05 13:53
OK, alles klar !!!

Habs nun so gelöst:

Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
 
aTemp := quProzess.FieldByName('CreationDate');

aDate := copy(aTemp, 1, 4);
aDate := aDate + '.' + copy(aTemp, 5, 2);
aDate := aDate + '.' + copy(aTemp, 7, 2);

aTime := copy(aTemp, 9, 2);
aTime := aTime + ':' + copy(aTemp, 11, 2);
aTime := aTime + ':' + copy(aTemp, 13, 2);

aDateTime := aDate + ' - ' + aTime;



Danke an alle !!!

Moderiert von user profile iconraziel: Delphi-Tags hinzugefügt.


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!