Aufruf "shutdown -a" per shellexecute?

[StefanDP]

ShellExecute(Handle, 'open', 'shutdown.exe', '-a', nil, SW_SHOW);

du kannst auch einfach windowstaste + R (ausführen...) und dann shutdown -a eingeben
ab da kannst du ganz bequem mit Windowstaste + R und dann enter den neustart abbrechen

stefan