如何在 Delphi 应用程序（7，试图将其移植到2010）中强制系统（XP或7）关闭？
zbsbpyhn1#
看看Zarco Gajic在www.example.com上的提示About.com，“Shut down/reboot Windows 2000/XP/NT”。
oxiaedzo2#
你可以用这个代码
ShellExecute(0, nil, 'cmd.exe', '/C shutdown /s', nil, SW_HIDE);
不记得添加到USES ShellApi。这段代码运行命令shtrdown与参数/s在命令行.Shutdown command
2条答案
按热度按时间zbsbpyhn1#
看看Zarco Gajic在www.example.com上的提示About.com，“Shut down/reboot Windows 2000/XP/NT”。
oxiaedzo2#
你可以用这个代码
不记得添加到USES ShellApi。
这段代码运行命令shtrdown与参数/s在命令行.
Shutdown command