如题

解决方案 »

  1.   

    利用API:SHShutDownDialog即可,参考:http://www.7880.com/Info/Article-4b835c20.htmlDeclare Function SHShutDownDialog Lib "shell32" Alias "#60"(ByVal YourGuess As Long) As Long
      

  2.   

    顶一下,难道CSDN没人吗?!我原来就做过的。
      

  3.   

    那岂不是更麻烦,用KEYBD_EVENT函数或者SENDMESSAGE函数模拟WIN或着CTRL+ESC键,即点“开始”,然后再模拟下“U”键即可实现,但估计不是一句代码能解决了的
      

  4.   

    function ShutDownDialog(hwnd: HWND): LongBool; stdcall; external 'shell32.dll' index 60;procedure TForm1.Button1Click(Sender: TObject);
    begin
      ShutDownDialog(Handle);
    end;