Jak wyświetlić amerykański format czasu?

Jak wyświetlić amerykański format czasu?
Marius.Maximus
  • Rejestracja:ponad 14 lat
  • Ostatnio:4 minuty
  • Postów:2102
0

Ktoś może pamięta czy w delphi są zadeklarowane gdzieś stałe które można użyć z funkcja FormatDateTime aby uzyskać format daty/czasu zgodny z oczekiwaniami mieszkańca USA ?
Czy to trzeba zapytać system operacyjny ?
Czy to jakaś inna filozofia uzyskania daty w formacie dla danego kraju ?

Przypomniało mi się

Kopiuj
formatSettings := TFormatSettings.Create('en-US'); // lub GetLocaleFormatSettings($0409 , formatSettings); // en-US
ShowMessage(TimeToStr(Now, formatSettings ));
ShowMessage(DateTimeToStr(Now, formatSettings ));
ShowMessage(FormatDateTime( formatSettings.LongTimeFormat, now, formatSettings));

--
Nie przyjmuję reklamacji za moje rady, używasz na własną odpowiedzialność.
Programowanie bez formatowania to jak chodzenie ze spodniami spuszczonymi na kostki. Owszem da się ale po pierwsze nie wygodne, po drugie nieprzyzwoicie wygląda.
Przed zaczęciem nowego wątku przeczytam problem XY
edytowany 3x, ostatnio: Marius.Maximus
flowCRANE
Moderator Delphi/Pascal
  • Rejestracja:ponad 13 lat
  • Ostatnio:około 4 godziny
  • Lokalizacja:Tuchów
  • Postów:12175
1

Pamiętaj, że format możesz samodzielnie podać w formie literału w funkcji FormatDateTime. W ten sposób możesz nie tylko korzystać z formatów dla innych locale, ale też zdefiniować sobie zupełnie własny.

Przy okazji — stałe raczej nie są zadeklarowane, ale jest globalna zmienna FormatSettings, której możesz używać.


Pracuję nad własną, arcade'ową, docelowo komercyjną grą z gatunku action/adventure w stylu retro (pixel art), programując silnik i powłokę gry od zupełnych podstaw, przy użyciu Free Pascala i SDL3. Więcej informacji znajdziesz na moim mikroblogu.
edytowany 2x, ostatnio: flowCRANE
Marius.Maximus
  • Rejestracja:ponad 14 lat
  • Ostatnio:4 minuty
  • Postów:2102
0

@furious programming: dziękuje ! zaczęło mi się coś przypominać wiec poprawiłem pierwszy post i podałem przykład.

na początku przypomniała mi się funkcja która użyłem w starym projekcie w D2010

Kopiuj
{ GetLocaleFormatSettings loads locale-specific variables (date, time, number,
  currency formats) with values provided by the operating system for the
  specified locale (LCID). The values are stored in the FormatSettings record. }

{$IFDEF MSWINDOWS}
procedure GetLocaleFormatSettings(LCID: Integer;
  var FormatSettings: TFormatSettings);
{$ENDIF}

ale aby jej użyć trzeba znać LCID dla wybranego locale (lista na stronie Microsoft)

A potem w nowszym Delphi 10.4 znalazłem TFormatSettings.Create('en-US')


--
Nie przyjmuję reklamacji za moje rady, używasz na własną odpowiedzialność.
Programowanie bez formatowania to jak chodzenie ze spodniami spuszczonymi na kostki. Owszem da się ale po pierwsze nie wygodne, po drugie nieprzyzwoicie wygląda.
Przed zaczęciem nowego wątku przeczytam problem XY
flowCRANE
Moderator Delphi/Pascal
  • Rejestracja:ponad 13 lat
  • Ostatnio:około 4 godziny
  • Lokalizacja:Tuchów
  • Postów:12175
0
Marius.Maximus napisał(a):

A potem w nowszym Delphi 10.4 znalazłem TFormatSettings.Create('en-US')

I z tego korzystaj, jeśli potrzebujesz paczki formatowania dla konkretnego języka.

Możesz skorzystać z globalnej zmiennej FormatSettings i do niej wpakować lokalne en-US, jeśli w obrębie całego programu zamierzasz z tego formatowania korzystać. Nie będziesz musiał deklarować swojej zmiennej i za każdym razem podawać jej do funkcji konwertujących.


Pracuję nad własną, arcade'ową, docelowo komercyjną grą z gatunku action/adventure w stylu retro (pixel art), programując silnik i powłokę gry od zupełnych podstaw, przy użyciu Free Pascala i SDL3. Więcej informacji znajdziesz na moim mikroblogu.
edytowany 2x, ostatnio: flowCRANE
Azarien
  • Rejestracja:ponad 21 lat
  • Ostatnio:około 21 godzin
1
Marius.Maximus napisał(a):

Ktoś może pamięta czy w delphi są zadeklarowane gdzieś stałe które można użyć z funkcja FormatDateTime aby uzyskać format daty/czasu zgodny z oczekiwaniami mieszkańca USA ?
Czy to trzeba zapytać system operacyjny ?
Czy to jakaś inna filozofia uzyskania daty w formacie dla danego kraju ?

Filozofia jest generalnie taka, że powinno się wyświetlać zgodnie z ustawieniami systemowymi, a w systemie użytkownik ma ustawione jak chce (czyli zazwyczaj zgodnie z językiem systemu).

Miang
no z polskimi ustawieniami cos klientom nie pasowało, ale to chyba z wyświetlaniem kwot pieniędzy
Azarien
Ale to trzeba by uzgodnić o co im dokładnie chodzi i dlaczego format właściwy dla języka im się nie podoba…
flowCRANE
Moderator Delphi/Pascal
  • Rejestracja:ponad 13 lat
  • Ostatnio:około 4 godziny
  • Lokalizacja:Tuchów
  • Postów:12175
1

@Marius.Maximus: a tak w ogóle to czemu ci zależy konkretnie na amerykańskim formacie?


Pracuję nad własną, arcade'ową, docelowo komercyjną grą z gatunku action/adventure w stylu retro (pixel art), programując silnik i powłokę gry od zupełnych podstaw, przy użyciu Free Pascala i SDL3. Więcej informacji znajdziesz na moim mikroblogu.
Marius.Maximus
  • Rejestracja:ponad 14 lat
  • Ostatnio:4 minuty
  • Postów:2102
0

@furious programming: działa handlowy znalazł nowy rynek zbytu w USA i trzeba trochę dostosować oprogramowanie do potrzeb nowych klientów którzy trochę inaczej grymaszą :D


--
Nie przyjmuję reklamacji za moje rady, używasz na własną odpowiedzialność.
Programowanie bez formatowania to jak chodzenie ze spodniami spuszczonymi na kostki. Owszem da się ale po pierwsze nie wygodne, po drugie nieprzyzwoicie wygląda.
Przed zaczęciem nowego wątku przeczytam problem XY
flowCRANE
Moderator Delphi/Pascal
  • Rejestracja:ponad 13 lat
  • Ostatnio:około 4 godziny
  • Lokalizacja:Tuchów
  • Postów:12175
3

@Marius.Maximus: wszystko fajnie, tyle że tak jak wspomniał @Azarien, spokojnie możesz korzystać z bieżącej lokalizacji użytkownika. W ten sposób nie tylko będziesz miał mniej roboty, ale i zapewnisz wsparcie formatu dat (i nie tylko) każdemu użytkownikowi, bez względu na to gdzie się znajduje i jakie ma ustawienia (w tym niestandardowe).


Pracuję nad własną, arcade'ową, docelowo komercyjną grą z gatunku action/adventure w stylu retro (pixel art), programując silnik i powłokę gry od zupełnych podstaw, przy użyciu Free Pascala i SDL3. Więcej informacji znajdziesz na moim mikroblogu.
Marius.Maximus
  • Rejestracja:ponad 14 lat
  • Ostatnio:4 minuty
  • Postów:2102
0

pominąłem drobny szczegół:
klient dostaje urządzenie razem z oprogramowaniem w którym nie ma dostępu do systemu operacyjnego ani żadnych ustawień Windows, dodatkowo partycja systemowa ma blokadę zapisu na dysku, wszelkie zmiany na C: są zapisywane do ram i po restarcie nie ma po nich śladu


--
Nie przyjmuję reklamacji za moje rady, używasz na własną odpowiedzialność.
Programowanie bez formatowania to jak chodzenie ze spodniami spuszczonymi na kostki. Owszem da się ale po pierwsze nie wygodne, po drugie nieprzyzwoicie wygląda.
Przed zaczęciem nowego wątku przeczytam problem XY
flowCRANE
Moderator Delphi/Pascal
  • Rejestracja:ponad 13 lat
  • Ostatnio:około 4 godziny
  • Lokalizacja:Tuchów
  • Postów:12175
0

Dziwne — co to za software?

W takim przypadku, zrobiłbym combobox ze wszystkimi wspieranymi ciągi znaków (typu en-US i pełną nazwą), tak aby użytkownik mógł sobie sam wybrać która lokalizacja go interesuje. A potem tej wartości bym użył do pobrania formatowania, czyli w konstruktorze TFormatSettings.Create.

Choć zawsze możesz enumerować lokalizacje w runtime, np. używając EnumSystemLocalesEx. ;)


Pracuję nad własną, arcade'ową, docelowo komercyjną grą z gatunku action/adventure w stylu retro (pixel art), programując silnik i powłokę gry od zupełnych podstaw, przy użyciu Free Pascala i SDL3. Więcej informacji znajdziesz na moim mikroblogu.
edytowany 2x, ostatnio: flowCRANE
KA
  • Rejestracja:prawie 20 lat
  • Ostatnio:minuta
  • Lokalizacja:Gorlice
1

Chwila TFormatSettings dostosowane jest do ustawień systemowych i nawet domyślnie reaguje na zmianę tych ustawień w czasie używania aplikacji więc jak one nie odpowiadają użytkownikowi to musisz tylko stworzyć na starcie ustawienia które odpowiadają użytkownikowi i zaraz po tym na false ustawić UpdateFormatSettings


Nie odpowiadam na PW w sprawie pomocy programistycznej.
Pytania zadawaj na forum, bo:
od tego ono jest ;) | celowo nie zawracasz gitary | przeczyta to więcej osób a więc większe szanse że ktoś pomoże.

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.