Registriert seit: 10. Mai 2005
160 Beiträge
Delphi 7 Enterprise
|
Re: Verändern derf Systemzeit
28. Jul 2008, 17:05
am einfachsten mit NtSetSystemTime (ist zwar nicht dokumentiert aber recht einfach zu benutzen).
Die erwartet als Parameter eine Variable die die 100ns seit 1.1.1600(oder ähnlich) angibt.
da musst du nur ne Konstante addieren und fertig.
Sonst bei SetSystemTime musst du dir was einfallen lassen:
z.B. Monat:=Monat+trunc(Tag/31);
Tag:=Tag mod 31;
|