如何写将你的计算机转入自动睡眠状态？(100分)

如何写将你的计算机转入睡眠状态？最好加个例子!
和win98关闭计算机的转入睡眠状态一样。

这个函数 ExitWindowsEx 可以吗?

这样做:
procedure TForm1.Button1Click(Sender: TObject);
begin
SetSystemPowerState( true, true );
end;
等一等,我马上把相应说明贴上来.

该API的说明:
The SetSystemPowerState function suspends the system by shutting power
down. Depending on the ForceFlag parameter, the function either suspends
operation immediately or requests permission from all applications and
device drivers beforedo
ing so.
BOOL SetSystemPowerState( BOOL fSuspend,BOOL fForce );
Parameters
fSuspend: Ignored.
fForce: Forced suspension. If TRUE, the function sends a PBT_APMSUSPEND
message to each application and driver, then
immediately suspends
operation. If FALSE, the function sends a PBT_APMQUERYSUSPEND
message to each application to request permission to suspend
operation.
Return Values
If power has been suspended and subsequently restored, the return value
is nonzero.
If the system was not suspended, the return value is zero. To get extended
error information, call GetLastError.
Remarks
If any application or driver denies permission to suspend operation, the
function sends a PBT_APMQUERYSUSPENDFAILED message to each application and
driver. If power is suspended, this function returns only after system
operation is resumes and related WM_POWERBROADCAST messages have been sent
to all applications and drivers.
PS: 用ExitWindowsEx好像应该是不行.

接受答案了.