Dialog "Zeitzone ändern" nachbauen

[TUX_der_Pinguin]

Zitat von Sir Rufo:

Hmmm, es gibt den Dialog doch schon ... einfach in die Systemeinstellung und die Zeitzone ändern, schon wird die Zeitzone des Systems geändert.

Warum willst du einen Dialog nachbauen, obwohl es den schon gibt?

Oder kann es evtl. sein, dass du die Zeitzone eigentlich nur für deine Anwendung ändern müsstest (wenn du nur wüsstest wie)?

Es geht um eine Art Kiosk Anwendung, sprich der Anwender kommt an den Windows Dialog gar nicht ran.
Der Anwender soll aber ein paar Optionen doch ändern können, Datum und Uhrzeit. Da habe ich gedacht warum
nicht auch die Zeitzone, wichtig wäre das nicht ist mehr interessehalber ob es geht.

[hathor]

Delphi-Quellcode:

uses Shellapi;
...
ShellExecute(Handle, 'open', 'control', 'date/time', nil, SW_SHOW); 
...

Oder so - tut das Gleiche:

Delphi-Quellcode:

procedure TForm1.ButtonClick(Sender: TObject);
var FN, strParams : String;
begin
//rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,/
 strParams:= 'shell32.dll,Control_RunDLL timedate.cpl,,/';
 FN:='rundll32.exe';
ShellExecute(Application.Handle,NIL,PWChar(FN), PWChar(strParams),NIL, SW_Normal);
end;

[TUX_der_Pinguin]

Zitat von hathor:

Delphi-Quellcode:

uses Shellapi;
...
ShellExecute(Handle, 'open', 'control', 'date/time', nil, SW_SHOW); 
...

Oder so - tut das Gleiche:

Delphi-Quellcode:

procedure TForm1.ButtonClick(Sender: TObject);
var FN, strParams : String;
begin
//rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,/
 strParams:= 'shell32.dll,Control_RunDLL timedate.cpl,,/';
 FN:='rundll32.exe';
ShellExecute(Application.Handle,NIL,PWChar(FN), PWChar(strParams),NIL, SW_Normal);
end;

Daran hatte ich noch nicht gedacht. Ich würde aber dennoch gerne wissen wie man die aktuelle Zeitzone in der Liste auswählt und wie man dann die Zeitzone ggf. ändern kann.

[markus5766h]

Moin,

such mal nach
"GetTimeZoneInformation" und "SetTimeZoneInformation" . . . da sollte sich noch was finden lassen.

[TUX_der_Pinguin]

Zitat von markus5766h:

Moin,

such mal nach
"GetTimeZoneInformation" und "SetTimeZoneInformation" . . . da sollte sich noch was finden lassen.

Naja nicht so wirklich den GetTimeZoneInformation liefert, wie ich eingangs geschrieben habe, nur eine unspezifische Antwort ( "Mitteleuropäische Zeit" ). In der Liste stehen aber detaillierte Informationen wie z.b. "(UTC+01:00) Amsterdam, Berlin, Bern, Rom, Stockholm, Wien". Wie sollte ich also mit GetTimeZoneInformation() entscheiden ob "UTC+1 Amsterdam, Berlin" oder "UTC+1 Sarajevo, Skopje" eingestellt ist. Klar die Zeitzone ist schon die gleiche aber ich will ja die Auswahl anbieten die auch der Standard Windows Dialog bietet.

[Luckie]

Die erweiterten Informationen stehen in der Registry: HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Time Zones

Die Frage ist jetzt, ob es dafür eine API Funktion gibt oder ob man die selbst zuordnen und auslesen muss.

[TUX_der_Pinguin]

Zitat von Luckie:

Die erweiterten Informationen stehen in der Registry: HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Time Zones

Die Frage ist jetzt, ob es dafür eine API Funktion gibt oder ob man die selbst zuordnen und auslesen muss.

Genau daher kommen die Informationen zum erstellen einer Liste aller im System verfügbaren Zeitzonen, wie sie auch im Standard Windows Dialog aufgelistet werden.

Die Frage ist eher steht da auch irgendwo welche Zeitzone zur Zeit aktuell eingestellt ist und lässt sich das dort ändern und wenn ja wie? Ich denke einfach etwas in der Registry ändern heißt ja nicht unbedingt das das System die Änderung auch mitbekommt und sofort anwendet. Fragen über Fragen.