Delphi implementation Shutdown Windows

Switches that control windows: such as shutting down Windows, restarting Windows, ExitWindowsEx (UINT Uflags,dword dwreserved); API functions to implement this function

Define Constants First

Const

ewx_force=4; Close all programs and log on as a different user

ewx_logoff=0; Restart your computer and switch to MS-DOS mode

ewx_reboot=2; Restart your computer

ewx_shutdown=1;//shut down the computer

Runtime to how to assign a value so that he equals ewx_shutdown or other, call the following statement

ExitWindowsEx (how,0);