Frage bezüglich Windows Herunterfahren...Wo ist mein Fehler?

[Forlan]

Hi, ich bin grad dabei ein Programm zu schreiben, welches windows zu einer bestimmten Uhrzeit herunterfährt (ich weiß, gibts viele von, möchte aber es mal selber versuchen^^)...

Aber wo ist hier mein Fehler?

Delphi-Quellcode:

procedure TMain.TiShutdownTimer(Sender: TObject);
begin
   if Time = DTPUhrzeit.Time then  //DTPUhrzeit = DateTimePicker
            begin
              ExitWindowsEx(EWX_SHUTDOWN, 0);
            end;
end;

Vielen Dank im Vorraus

MfG