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 - nicht lokalisiert (https://www.delphipraxis.net/53585-strtodatetime-nicht-lokalisiert.html)

DieHardMan 19. Sep 2005 15:02


StrToDateTime - nicht lokalisiert
 
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 19. Sep 2005 15:14

Re: StrToDateTime - nicht lokalisiert
 
Hi,

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

mfG
mirage228

DieHardMan 19. Sep 2005 15:16

Re: StrToDateTime - nicht lokalisiert
 
Da steht z.B. drin: '19.09.2005 14:28:04'

mirage228 19. Sep 2005 15:18

Re: StrToDateTime - nicht lokalisiert
 
Zitat:

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


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:34 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