Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi StrToDateTime('2018-06-04T00:00:10'); ungültiges Format (https://www.delphipraxis.net/200965-strtodatetime-2018-06-04t00-00-10-%3B-ungueltiges-format.html)

Friedhelm Drecktrah 11. Jun 2019 22:21

Delphi-Version: 10.2 Tokyo

StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Hallo,

wie wandle ich den String '2018-06-04T00:00:10' in ein Datum um?

dt := StrToDateTime('2018-06-04T00:00:10');
funktioniert nicht, ungültiges Format.

zum Vergleich:
in C# reicht
var dt = Convert.ToDateTime("2018-06-04T00:00:10");

Besten Dank und Gruß

EWeiss 11. Jun 2019 22:33

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
http://www.delphibasics.co.uk/RTL.as...=DateTimeToStr

gruss

Friedhelm Drecktrah 11. Jun 2019 22:36

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Nein, funktioniert nicht.
Man beachte das 'T' im String.

Maekkelrajter 11. Jun 2019 22:56

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Wie wär's mit XMLTimeToDateTime? http://docwiki.embarcadero.com/Libra...TimeToDateTime

Gruß LP

EWeiss 11. Jun 2019 22:59

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Zitat:

Zitat von Friedhelm Drecktrah (Beitrag 1434385)
Nein, funktioniert nicht.
Man beachte das 'T' im String.

Ach so nicht gesehen ;)
Dann ist die Lösung von @Maekkelrajter wohl die nächste.

gruss

Friedhelm Drecktrah 11. Jun 2019 23:20

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Super, XMLTimeToDateTime funktioniert.
Soap.XSBuiltIns unter uses hinzugefügt und klappt.

Der String '2018-06-04T00:00:10' kommt tatsächlich aus einem REST/Json-WebAPI.
Interessant, dass man hier eine Routine aus Soap verwenden kann.

Anyway, besten Dank!

Friedhelm Drecktrah 11. Jun 2019 23:33

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
...ich sehe gerade:
aus '2018-06-04T00:00:10' wird 04.06.2018 02:00:10 (TDateTime)

Zeitzone? Sommerzeit? GMT? Ist schon spannend...

Gruß

Schokohase 11. Jun 2019 23:59

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Zitat:

Zitat von Friedhelm Drecktrah (Beitrag 1434392)
...ich sehe gerade:
aus '2018-06-04T00:00:10' wird 04.06.2018 02:00:10 (TDateTime)

Zeitzone? Sommerzeit? GMT? Ist schon spannend...

https://de.wikipedia.org/wiki/ISO_8601

dummzeuch 12. Jun 2019 08:16

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Da hat man ausnahmsweise mal eines der am besten dokumentierten und strukturierten Datums / Zeitformate, das es gibt, und die Standard-Funktion von Delphi kann es nicht interpretieren.

Es lebe das amerikanische Format: 09/11/01 8:46 am

Bisher ist mir noch nichts schlimmeres in der Praxis untergekommen.

Friedhelm Drecktrah 12. Jun 2019 08:58

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
@dummzeuch:
Exakt, sehe ich genauso...

DieDolly 12. Jun 2019 09:02

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Zitat:

Da hat man ausnahmsweise mal eines der am besten dokumentierten und strukturierten Datums / Zeitformate, das es gibt, und die Standard-Funktion von Delphi kann es nicht interpretieren.
Würde weniger Arbeit in iOS, Android und Linux gesteckt und mehr in grundlegende Funktionen, wie die hier genannte, wäre sowas vielleicht nie passiert.

Schokohase 12. Jun 2019 09:05

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Und wieviele Funktionen sollen die dafür noch anbieten?
http://docwiki.embarcadero.com/Libra....ISO8601ToDate

Friedhelm Drecktrah 12. Jun 2019 11:36

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Gewusst wo: System.DateUtils.ISO8601ToDate funktioniert!

@Schokohase: Besten Dank!

p80286 12. Jun 2019 13:18

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Zitat:

Zitat von Schokohase (Beitrag 1434415)
Und wieviele Funktionen sollen die dafür noch anbieten?
http://docwiki.embarcadero.com/Libra....ISO8601ToDate

Weil ich sie nicht gefunden habe, hatte ich mir mal was selbst gebastelt.
Delphi-Quellcode:
StrToDateTime(DateTimeString,DateTimeStringFormatString)
oder so ähnlich wäre ganz nett.
Dann könnte man jedes noch so obskure Format verarbeiten.

Gruß
K-H

Maekkelrajter 12. Jun 2019 13:59

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Zitat:

Zitat von Schokohase (Beitrag 1434393)
Zitat:

Zitat von Friedhelm Drecktrah (Beitrag 1434392)
...ich sehe gerade:
aus '2018-06-04T00:00:10' wird 04.06.2018 02:00:10 (TDateTime)

Zeitzone? Sommerzeit? GMT? Ist schon spannend...

https://de.wikipedia.org/wiki/ISO_8601

Wenn man den booleschen Parameter AsUTCTime auf true setzt, dann klappt's auch mit XMLTimeToDateTime
Bei System.DateUtils.ISO8601ToDate muss ja auch der Parameter AReturnUTC mit 'true' übergeben werden.
Dummerweise hat XMLTimeToDateTime 'false' als Vorgabe, im Gegensatz zu ISO8601ToDate.

Gruß LP

Stevie 13. Jun 2019 11:54

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Wenn man keine Zeitzonen Information im String hat geht auch folgendes:

Delphi-Quellcode:
var
  dt: TDateTime;
  isoFormatSettings: TFormatSettings;
begin
  isoFormatSettings := TFormatSettings.Create;
  isoFormatSettings.ShortDateFormat := 'YYYY-MM-DD';
  isoFormatSettings.DateSeparator := '-';
  isoFormatSettings.TimeSeparator := ':';
  isoFormatSettings.DecimalSeparator := '.';
  dt := StrToDateTime('2018-06-04T00:00:10', isoFormatSettings);

dummzeuch 13. Jun 2019 12:05

AW: StrToDateTime('2018-06-04T00:00:10'); ungültiges Format
 
Zitat:

Zitat von p80286 (Beitrag 1434439)
Delphi-Quellcode:
StrToDateTime(DateTimeString,DateTimeStringFormatString)
oder so ähnlich wäre ganz nett.
Dann könnte man jedes noch so obskure Format verarbeiten.

Nur leider ist sowas unmöglich zu programmieren. Selbst wenn man es tatsächlich schafft, alle existierenden Datumsformate (+ Zeitformate) zu unterstützen, wird irgendwer kommen und ein neues einführen. Das ist immer so.


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:31 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz