Uhrzeit übernehmen

[3_of_8]

Wo ist das Problem? Beim bekommen der Daten aus dem INet oder beim Setzen der Systemzeit?

Wenn es beim Setzen der Sytemzeit ist, hilft dir das bestimmt weiter:

Delphi-Quellcode:

procedure SetSystemTime(Year,Month,Day,Hour,Minute,Second,MilliSeconds: Cardinal); 
var
 TimeStruct: TSystemTime;
begin
 TimeStruct.wYear := Year;
 TimeStruct.wMonth := Month;
 TimeStruct.wDay := Day;
 TimeStruct.wHour := Hour;
 TimeStruct.wMinute := Minute;
 TimeStruct.wSecond := Second;
 TimeStruct.wMilliSeconds := MilliSeconds;
 if not SetLocalTime(TimeStruct) then RaiselastOSError;
end;