StrToDateTime - nicht lokalisiert

[DieHardMan]

Da gabs zwar schon Threads drüber, aber helfen konnten die mir auch net.

Ich brauche für meinen RSS Feed englische Tages- und Monatskürzel, es muss also folgendermaßen aussehen:
<pubDate>Fri, 19 mar 2005 10:30:00 +0200</pubDate>

momentan sieht es bei mir so aus:
<pubDate>Fr, 19 mai 2005 14:15:00 +0200</pubDate>

also die ShortDayNames und ShortMonthNames brauch ich auf Englisch.

Dann hab ich folgenden Code benutzt um die ShortDayNames zu ersetzen.

Delphi-Quellcode:

var
  formatSettings : TFormatSettings;
begin
  GetLocaleFormatSettings(LOCALE_SYSTEM_DEFAULT, formatSettings);
  FormatSettings.ShortDayNames[1] := 'Mon';
  FormatSettings.ShortDayNames[2] := 'Tue';
  FormatSettings.ShortDayNames[3] := 'Wed';
  FormatSettings.ShortDayNames[4] := 'Thu';
  FormatSettings.ShortDayNames[5] := 'Fri';
  FormatSettings.ShortDayNames[6] := 'Sat';
  FormatSettings.ShortDayNames[7] := 'Sun';

...

  PubDate.DateTime :=
    StrToDateTime(lstRSSData.Items.Item[i].SubItems.Strings[5], FormatSettings);

Klappt aber nicht, er benutzt immer noch die lokalisierten Tagesnamen benutzt, also Mon, Di, Mi...

[mirage228]

Hi,

was genau steht in "lstRSSData.Items.Item[i].SubItems.Strings[5]" drin, damit ich das mal testen könnte?

mfG
mirage228

[DieHardMan]

Da steht z.B. drin: '19.09.2005 14:28:04'

[mirage228]

Zitat von DieHardMan:

Da steht z.B. drin: '19.09.2005 14:28:04'

Also bei so etwas gibt es ja nicht viel zu lokalisieren.
Das betrifft dann, wenn überhaupt, nur Funktionen wie FormatDateTime u.dgl., also solche die dann aus einem TDateTime Wert wieder einen string bauen, dort musst Du die FormatSettings Variable befüllen.

mfG
mirgae228