如何注销或退出WIN2000系统,用哪些函数 关闭windows ExitWindowsEx(EWX_SHUTDOWN,0)重启windows ExitWindows(EWX_REBOOT,0) 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 呵呵,这个老方法是win9x only。在win2000/xp之下,比较麻烦。首先要取得当前进程的权限,然后修改权限,最后才能使用这函数关机或者重起。我自己编写过一个这样的程序(delphi),可惜代码在单位里。如果大家需要,周一我可以贴上来。 在20000下关机不象在98下直接调用ExitWindows函数就成,你首先要用OpenProcessToken函数打开与进程相关的访问信令然后再使用ExitWindow函数退出Win2000.以下这段程序可供参考:varhToken :THandle ;tkp :TOKEN_PRIVILEGES ;otkp :TOKEN_PRIVILEGES ;dwLen :Dword ;beginif OpenProcessToken(GetCurrentProcess ,TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY ,hToken) thenbeginLookupPrivilegeValue(Nil ,'SeShutdownPrivilege' ,tkp.PrivilegeValue[0].Luid) ; tkp.PrivilegeCount := 1 ;tkp.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED; AdjustTokenPrivileges(hToken ,False ,tkp ,sizeof(tkp) ,otkp,dwLen) ; if (GetLastError() = ERROR_SUCCESS) thenbegin ExitWindowsEx(EXW_POWEROFF ,0) ; //关机 ExitWindowsEx(EWX_SHUTDOWN,0) ;//关闭windows ExitWindows(EWX_REBOOT,0) ;重启windows end ;end ;注销就ExitWindows(EWX_REBOOT,0) ; 如何取得控件颜色的16进制的编码 如何用DELPHI开发 数据库系统开发平台 怎么用程序模拟鼠标点击WebBrowser中超级链接?? 一个DBGrid问题 CoInitialize的一个多线程问题 那里可以下在RXLib这一控件?急!! 还是关于按键,请教高手! 有谁知道,哪里有能看DELPHI程序写的软件用了哪些VCL控件的? 请用过TdxDBEdit和TdxDBGrid控件的朋友进来帮我看一下??? 请问table.filter 怎么用??? StringGrid问题? 请高手指点,'Sygate'侦听哪个端口,IE,等软件才能自动连上?谢谢!
在win2000/xp之下,比较麻烦。
首先要取得当前进程的权限,然后修改权限,最后才能使用这函数关机或者重起。
我自己编写过一个这样的程序(delphi),可惜代码在单位里。如果大家需要,周一我可以贴上来。
在20000下关机不象在98下直接调用ExitWindows函数就成,你首先要用OpenProcessToken函数打开与进程相关的访问信令然后再使用ExitWindow函数退出Win2000.以下这段程序可供参考:
var
hToken :THandle ;
tkp :TOKEN_PRIVILEGES ;
otkp :TOKEN_PRIVILEGES ;
dwLen :Dword ;
begin
if OpenProcessToken(GetCurrentProcess ,TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY ,hToken) then
begin
LookupPrivilegeValue(Nil ,'SeShutdownPrivilege' ,tkp.PrivilegeValue[0].Luid) ;
tkp.PrivilegeCount := 1 ;
tkp.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED;
AdjustTokenPrivileges(hToken ,False ,tkp ,sizeof(tkp) ,otkp,dwLen) ;
if (GetLastError() = ERROR_SUCCESS) then
begin
ExitWindowsEx(EXW_POWEROFF ,0) ; //关机
ExitWindowsEx(EWX_SHUTDOWN,0) ;//关闭windows ExitWindows(EWX_REBOOT,0) ;重启windows end ;
end ;
注销就
ExitWindows(EWX_REBOOT,0) ;