我要問的問題如題，我有在文章中發現一篇文章(http://delphi.ktop.com.tw/topic.php?topic_id=25379)可是我不懂Delphi，所以請各位大大幫幫忙解決我的問題，謝謝！

Dear LeonSun    您可以參考下的程式     

void __fastcall AdjustToken(void)
{
        HWND Handle_1 = GetCurrentProcess();
        HWND Handle_2;
        LUID ID;
        TOKEN_PRIVILEGES        Data;            OpenProcessToken(Handle_1,TOKEN_ADJUST_PRIVILEGES,&Handle_2);
        LookupPrivilegeValue("","SeShutdownPrivilege",&ID);            Data.PrivilegeCount = 1;
        Data.Privileges[0].Luid = ID;
        Data.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;            AdjustTokenPrivileges(Handle_2,false,&Data,NULL,NULL,NULL);
}
//---------------------------------------------------------------------------
void __fastcall SystemShutdown(void)
{
        AdjustToken();
        ExitWindowsEx(EWX_POWEROFF,0);
}
//---------------------------------------------------------------------------
void __fastcall SystemSuspend(void)
{
        AdjustToken();
        SetSystemPowerState (true, true);
}
//---------------------------------------------------------------------------
void __fastcall SystemSleep(void)
{
        AdjustToken();
        SetSystemPowerState (false, false);
}
//---------------------------------------------------------------------------     

在執行程式前要注意兩點 1. 在控制台 -> 顯示 -> 螢幕保護裝置 -> 電源 -> 休眠 內 要先啟用休眠...不然會有問題 2. 如果您是在 Embedded 下 Run 休眠...要注意硬碟的 Jump 要嚴謹 因為我發生過回來會掛掉的狀況... 調好 Jump 就比較沒事 Baby

感謝CuteBabyBoy兄的大力支援，我試過您的範例的確好用的很，我可否貪得無饜的再問您 在控制台 -> 顯示 -> 螢幕保護裝置 -> 電源 -> 休眠 這個機制可有法子可以Always Enabled，因為我不知道使用者是否知道這個機制而我也必須要進這個ACPI模式，可否請您再次賜教。

引言: 感謝CuteBabyBoy兄的大力支援，我試過您的範例的確好用的很，我可否貪得無饜的再問您 在控制台 -> 顯示 -> 螢幕保護裝置 -> 電源 -> 休眠 這個機制可有法子可以Always Enabled，因為我不知道使用者是否知道這個機制而我也必須要進這個ACPI模式，可否請您再次賜教。

這個啟動休眠的選項...我猜您在 Regedit 內找找看吧 ( 我猜啦 )，因為我執行程式前的先決條件是已經 Enabled ，所以我就不用擔心這個設定 那有找那個關鍵字...這可能真的要查書了...(目前我還沒找到) 但您但 Enabled 了...就會一直 Save ~~ 所以不用擔心會更改 希望能幫上您的忙...功力不夠的地方請見諒...^^ Baby

CuteBabyBoy兄，您實在是太客氣了，雖然我額外問的問題必須由我自己去解決，但明顯的我這個主題您已經回答了，所以我將答題得分給您。