如何调用windows关机对话框？

[kedy211]

请问如何实现用程序调用关机对话框来进行关机呢？

[966126]

我上次调用'打开方式...'用的是
winexec(PChar('rundll32 shell32,OpenAs_RunDLL '+FilePath),SW_SHOWDEFAULT);

不过我也是在别人VB的源码中找来的，具体怎么做也不是很清楚，你可以试试在这方面下手找资料

[hongqi162]

ExitWindowsEx(EWX_LOGOFF, 0); //注销
ExitWindowsEx(EWX_REBOOT, 0);//重起
ExitWindowsEx(EWX_POWEROFF, 0);//关机

[kedy211]

不是这个，我想要的是调用关机对话框。

[上海老李]

自己做，
一个对话框
三个选择框
调用API
ExitWindowsEx(EWX_LOGOFF, 0); //注销
ExitWindowsEx(EWX_REBOOT, 0);//重起
ExitWindowsEx(EWX_POWEROFF, 0);//关机
2000 or xp need 权限

[naughtyboy]

var
shellapp: variant;
begin
shellapp := CreateOleObject('Shell.Application');
shellapp.shutdownwindows;
end;

[naughtyboy]

uses comobj;