这个太简单了吧。一个timer,一个api调用就可以了阿。<br>procedure exitwin(var msg:TWMQUERYENDSESSION);message WM_QUERYENDSESSION;<br>if CtrlCode='reset'<br> then exitwindowsex(2,0);<br>procedure Tform1.exitwin(var msg: TWMQUERYENDSESSION);<br>begin<br>inherited;<br>form1.Close;<br>end;