datumsformat

[Uwe Raabe]

Wenn es um Delphi geht: System.DateUtils hat eine Funktion DateToISO8601 .

[Popov]

Wenn es nur um die Formatierung geht:
  ShowMessage(FormatDateTime('yyyy-MM-dd"T"hh:nn:ss"Z"', Date)); Ansonsten siehe Tipps oben.

[khh]

sorry, geht bei mir wie immer um Lazarus.

DateToISO8601 gibts dort nicht

[mkinzler]

http://wiert.me/2011/08/18/iso-8601-...ebugging-tool/

[Phoenix]

Dann bleibt Dir vermutlich kaum was anderes über, als die Darstellung in ISO8601 und das Parsen von dort selber zu übernehmen.

Aber aufpassen, wenn Du das Codesample von Popov übernehmen willst:

Das Z hinten gibt an, das die Zeit in UTC ist. Das heisst wenn Du eine lokale Zeit hast (z.B. bei uns Mitteleuropäische Sommerzeit), dann musst Du jetzt z.B. 2015-06-30T15:56+02:00 angeben oder aber vorher in UTC umrechnen: 2015-06-30T13:56Z.

Ich empfehle vor der Implementierung das hier zu lesen: https://de.wikipedia.org/wiki/ISO_8601
Bzw. wenn Du eine Bibliothek findest die das macht, die dagegen mal kurz abzuklopfen.

[khh]

alsoo ich hab jetzt das Beispiel von Popov ausprobiert.
Das funktioniert bis zum 9. des Monats:

2015-06-09T00:00:00Z am 10. des Monats bekomme ich als Ergebnis :

2015-06-01T00:00:00Z0 am 11ten

2015-06-01T00:00:00Z1 was läuft da falsch??

[khh]

@Markus, ich danke dir, aber

XSBuiltIns hab ich bei Lazarus leider auch nicht

[BadenPower]

Zitat von khh:

alsoo ich hab jetzt das Beispiel von Popov ausprobiert.
Das funktioniert bis zum 9. des Monats:

Das Beispiel von Popov funktioniert einwandfrei.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  lDateTime: TDateTime;
begin
  lDateTime := StrToDate('10.06.2015','.');
  ShowMessage(FormatDateTime('yyyy-mm-dd"T"hh:nn:ss"Z"', lDateTime));
end;

Ausgabe: 2015-06-10T00:00:00Z

Zitat von khh:

was läuft da falsch??

Irgendetwas mit Deinen TDateTime-Werten, welche Du übergibst stimmt nicht.

Wo kommen die denn hier bzw. wie und wo werden diese erzeugt?

[khh]

mit

  myDate := StrToDate('01/06/15'); // Startdatum setze ich das Startdatum

in einer Schleife zähle ich die Daten hoch
tag: string;

Delphi-Quellcode:

  for i:= 1 to 30 do
    begin
       Tag:= FormatDateTime('yyyy-MM-dd"T"hh:nn:ss"Z"', myDate);     
       myDate := incDay(mydate) ;
    end;

EDIT: muss woanders liegen

[BadenPower]

Zitat von khh:

mit

  myDate := StrToDate('01/06/15'); // Startdatum setze ich das Startdatum

in einer Schleife zähle ich die Daten hoch
tag: string;

Delphi-Quellcode:

  for i:= 1 to 30 do
    begin
       Tag:= FormatDateTime('yyyy-MM-dd"T"hh:nn:ss"Z"', myDate);     
       myDate := incDay(mydate) ;
    end;

EDIT: muss woanders liegen

Dann zeige uns mal die Funktion incDay().