Zeitzone, Datum&Uhrzeit

[madina]

Hallo,

1. wie kann ich den Applet Datum & Uhrzeit aus dem Systemsteuerung in Delphi Modal aufrufen ?

2. Wie kann ich Zeitzone lesen und setzen aus Delphi

mfg

[kingflo]

Zu 2.

Delphi-Quellcode:

function GetTimeZone: string;
var
  TimeZone: TTimeZoneInformation;
begin
  GetTimeZoneInformation(TimeZone);
  Result := 'GMT ' + IntToStr(TimeZone.Bias div -60);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  label1.Caption := GetTimeZone;
end;

[robinWie]

Hi,

Zu 1)
ich kenne nur die möglickeit (vielleicht ne hilfe *g*)

Delphi-Quellcode:

Label1.Caption:=TimeToStr(Time);
Label2.Caption:=DatetoStr(Date);

die möglickeit sollte man aber mit eiem TTimer verbinden, das sie sonst nicht Aktualisiert wird.

Robin

[himitsu]

Zu 1.
Du brauchst nur die entprechende CPL z.B. mit ShellExecute aufrufen.
Und das mit dem Modal ... such mal in der DP, da gibt es irgendwo Moglichkeiten auf das Beenden eines Programms zu warten ... ich glaub mit CreateProcess, oder so.

Was die CPL angeht ... such einfach mal im Ordner System32 (unter Windows) nach *.cpl ... es wird sich da bestimmt irgendeine finden lassen, die sowas z.B. "time", oder etwas ähliches im Namen hat