Systemdatum verändern

[Henrik Heuer]

Ich möchte mit mit einer Delphi-Anwendung das Systemdatum verändern. Wie geht das ?

[Andreas Kosch]

Hallo,

für diesen Job ist im Win32-API die Funktion <b>SetSystemTime</b> vorgesehen, die gleichzeitig Datum und Zeit setzen kann. Ein Beispiel dafür ist in der Hilfedatei des Platform SDK

[Mathias Simmack]

)<br>
Aus dem PSDK vom August:

<pre>// SetNewTime - sets system time
// Return value - TRUE if successful, FALSE otherwise
// hour - new hour (0-23)
// minutes - new minutes (0-59)<br>
BOOL SetNewTime(WORD hour, WORD minutes)
{
SYSTEMTIME st;
char *pc; <i>// <-- wozu eigentlich?</i><br><br>
GetSystemTime(&amp;st); // gets current time
st.wHour = hour; // adjusts hours
st.wMinute = minutes; // and minutes
if (!SetSystemTime(&amp;st)) // sets system time
return FALSE;
return TRUE;
}</pre>

Lässt sich eigentlich problemlos nach Delphi umsetzen.
Wichtig scheint mir aber noch dieser Abschnitt aus dem PSDK:

<i><b>Windows NT/2000/XP</b>: The <b>SetSystemTime</b> function enables the SE_SYSTEMTIME_NAME privilege before changing the system time. This privilege is disabled by default.</i&gt