Systemzeit ändern (Win7 x64)

[p7SXGxyS]

Ok

Delphi-Quellcode:

getsystemtime(timestruct);
  if TimeStruct.wHour>=23 then
  begin
    TimeStruct.wDay := TimeStruct.wDay+1;
    TimeStruct.wHour := 0;
  end
  else
  begin
    TimeStruct.wHour := (TimeStruct.wHour+1);
  end;


  if SetLocalTime(TimeStruct) then
    ShowMessage('1Up :-D')
  else
    RaiselastOSError;

die message erscheint! ich hab um 20:03 auf den button geklickt, getsystemtime liefert nur leider 19 uhr