有关计算机控制的问题！！！急急急！！！在线等！！！

Question

请问在DELPHI中怎么样实现计算机锁定，功能像WINDOWS　2000锁定一样。请各位高手指点，小弟在些先谢了。QQ：21353088　MSN：[email protected]  E-MAIL:[email protected]

Answer 1

锁定还真不知道，敷上其他几种控制方式参考
procedure TForm1.Button1Click(Sender: TObject);
begin
  case rgexit.itemindex of
    0: exitwindowsex(ewx_logoff, 0); //注销当前用户并重新登录
    1: exitwindowsex(ewx_reboot, 0); //关闭Windows并重新启动
    2: exitwindowsex(ewx_shutdown, 0); //关闭Windows
  end;
end;