Einzelnen Beitrag anzeigen

p7SXGxyS

Registriert seit: 31. Mai 2008
8 Beiträge
 
Delphi 6 Personal
 
#1

Systemzeit ändern (Win7 x64)

  Alt 31. Okt 2010, 18:45
Halloa,

ich möchte gerne mit einem programm die systemzeit um eine stunde erhöhen (23h->0h;tag+1)
das hab ich erstmal so versucht:

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;
setlocaltime(timestruct);
aber das funktioniert nicht
wenn ich da mit F7 durchrausch dann scheint ein fehler bei getsystemtime() zu liegen, liefert nicht die korrekte zeit
weiß jemand warums nicht geht oder hat j. eine bessere lösung für og. problem?
ich nutze win7 professional 64bit
  Mit Zitat antworten Zitat