DimkO, ShellExecute из модуля ShellApi

ShellExecute(Handle, 'open', 'cmd.exe', 'shutdown -s', nil, SW_SHOWNORMAL);