Einzelnen Beitrag anzeigen

ngott2

Registriert seit: 26. Aug 2013
81 Beiträge
 
Delphi 10 Seattle Professional
 
#10

AW: String in Datum umwandeln

  Alt 27. Jan 2020, 13:56
Lohnt es sich es zu versuchen mit TDateFormat?
Eher nicht.

Ich würde einen Wrapper um ISOISO601ToDate machen, der bei Bedarf den Doppelpunkt im Zeit-Offset ergänzt:
Delphi-Quellcode:
function ISO8601ToDate(const AISODate: string; AReturnUTC: Boolean = True): TDateTime;
var
  idxSign: Integer;
  S: string;
begin
  S := AISODate;
  idxSign := S.LastIndexOfAny(['+', '-']);
  if S.LastIndexOf(':') < idxSign then
    S := S.Insert(idxSign + 3, ':');
  Result := System.DateUtils.ISO8601ToDate(S, AReturnUTC);
end;
Bei einem Update auf 10.3.3+ kannst du den ja wieder rausnehmen.
Danke damit funktioniert es bei mir. Das ist für mich als Lösung ausreichend.

Danke euch allen.
  Mit Zitat antworten Zitat