Datum aus XML in DateTime umwandeln

**franktron**

Das ist der Code für die Umwandlung es kommt aber immer NOW raus

Delphi-Quellcode:

			FFormat:=TFormatSettings.Create('en-US');

  FFormat.DateSeparator:='.';

  FFormat.LongDateFormat:='dd.mmm.yyyy';

  ....

  FBestDatum:=StrToDateDef(Trim(Liste.Strings[1]),Now,FFormat);

Hier ist das Datum was ich als String bekomme 26.OCT.2018

Was mache ich da falsch.

**SProske**

StrToDate unterstützt keine (kurzen) Monatsnamen, nur Zahlen.
Workaround: Monatsnamen mit den passenden Zahlen ersetzen.

Außerdem benötigst du ShortDateFormat.

**franktron**

Jetzt kommt was ganz komisches

Wenn ich das hier mache (x ist Longint)
FFormat.ShortMonthNames[x] dann kommt nur Blödsinn.
Wenn ich aber FFormat.ShortMonthNames[1] geht es, was ist das denn

**DieDolly**

Wieso ist X denn ein LongInt, obwohl es nur 12 Monate gibt?
ShortMonthNames geht von 1 bis 12. Da bringt dir ein LongInt nix.

**Jasocul**

Zitat von franktron:

Wenn ich das hier mache (x ist Longint)
FFormat.ShortMonthNames[x] dann kommt nur Blödsinn.

Ist "x" evtl. gleich "0"?
Das Array geht von 1 bis 12 und nicht von 0 bis 11.

**franktron**

markieren

Delphi-Quellcode:

			for x:=1 To 12 do

              Begin

                if UpperCase(FFormat.ShortMonthNames[x])=UpperCase(Liste.Strings[1]) then

                  Liste.Strings[1]:=FFormat.ShortMonthNames[x];

              End;

Hier der Gesamte Code

**DieDolly**

Zitat von Jasocul:

Ist "x" evtl. gleich "0"?
Das Array geht von 1 bis 12 und nicht von 0 bis 11.

Da wäre es hilfreich zu wissen, wie der Blödsinn denn aussieht

Zitat von franktron:

Wenn ich das hier mache (x ist Longint)
FFormat.ShortMonthNames[x] dann kommt nur Blödsinn.
Wenn ich aber FFormat.ShortMonthNames[1] geht es, was ist das denn

**franktron**

Das ist ein Fehler im Debugger der Code läuft nur der Debugger zeigt mist

Datum aus XML in DateTime umwandeln

Datum aus XML in DateTime umwandeln

AW: Datum aus XML in DateTime umwandeln

AW: Datum aus XML in DateTime umwandeln

AW: Datum aus XML in DateTime umwandeln

AW: Datum aus XML in DateTime umwandeln

AW: Datum aus XML in DateTime umwandeln

AW: Datum aus XML in DateTime umwandeln

AW: Datum aus XML in DateTime umwandeln

Forumregeln

SProske Registriert seit: 16. Feb 2015 Ort: Halle/S. 116 Beiträge Delphi 10.2 Tokyo Enterprise	#2 AW: Datum aus XML in DateTime umwandeln 5. Nov 2018, 11:56 StrToDate unterstützt keine (kurzen) Monatsnamen, nur Zahlen. Workaround: Monatsnamen mit den passenden Zahlen ersetzen. Außerdem benötigst du ShortDateFormat. Sebastian
	Zitat

DieDolly Registriert seit: 22. Jun 2018 2.175 Beiträge	#4 AW: Datum aus XML in DateTime umwandeln 5. Nov 2018, 13:01 Wieso ist X denn ein LongInt, obwohl es nur 12 Monate gibt? ShortMonthNames geht von 1 bis 12. Da bringt dir ein LongInt nix.
	Zitat

Jasocul Registriert seit: 22. Sep 2004 Ort: Delmenhorst 1.337 Beiträge Delphi 11 Alexandria	#5 AW: Datum aus XML in DateTime umwandeln 5. Nov 2018, 13:11 Zitat von franktron: Wenn ich das hier mache (x ist Longint) FFormat.ShortMonthNames[x] dann kommt nur Blödsinn. Ist "x" evtl. gleich "0"? Das Array geht von 1 bis 12 und nicht von 0 bis 11. Peter
	Zitat

franktron Registriert seit: 11. Nov 2003 Ort: Oldenburg 1.446 Beiträge Delphi 10.2 Tokyo Enterprise	#8 AW: Datum aus XML in DateTime umwandeln 5. Nov 2018, 13:17 Das ist ein Fehler im Debugger der Code läuft nur der Debugger zeigt mist Frank Tux sein Lieblingsquellcode While anzfische<TuxSatt do begin Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
	Zitat