Delphi-PRAXiS - Delphi System aus Standby holen

Hi ich habe nach einer Möglichlkeit gesucht den PC aus dem Standby zu holen und habe im Internet was gefunden was ich aber nicht ganz verstehe wenn jemand ein paar Komentare anfügen könnte oder es komplett erläutern könnte wäre ich dankbar. Wenn jemand nen eingenen Code hat der das bewirkt wäre natürlich noch besser.

CODE AUS DEM INTERNET :

Delphi-Quellcode:

			var

liDuTime:LARGE_INTEGER;

weckzeit,uhrzeit:SYSTEMTIME;

ftime:FILETIME;

fitime:FILETIME;

begin

 weckzeit.wYear:=strtoint(edit1.text);

 weckzeit.wMonth:=strtoint(edit2.text);

 weckzeit.wDayOfWeek:=strtoint(edit4.text);

 weckzeit.wDay:=strtoint(edit3.text);

 weckzeit.wHour:=strtoint(edit5.text);

 weckzeit.wMinute:=strtoint(edit6.text);

 weckzeit.wSecond:=0;

 weckzeit.wMilliseconds:=0;

 SystemTimeToFileTime(weckzeit,ftime);

 LocalFileTimeToFileTime(ftime,fitime);

 liDuTime.LowPart:=fitime.dwLowDateTime;

 liDuTime.HighPart:=fitime.dwHighDateTime;

 hTimer:=CreateWaitableTimer(NIL,TRUE,NIL);

 CancelWaitableTimer(htimer);

 SetWaitableTimer(hTimer,lidutime.quadpart,1000,NIL,NIL,true);

 SetSuspendState(true,true,false);

end;