让机器进入待机或休眠状态

系统待机 / 休眠
----------------------------------------------------------------------------------------------
DECLARE Long SetSuspendState IN PowrProf ;
  Long Hibernate, Long ForceCritical, Long DisableWakeEvent
SetSuspendState( 0, 0, 0 )

三个参数的含义如下：
Hibernate　　　　   - 0 / 1:  0 - 进入待机状态,  1 - 进入休眠状态
ForceCritical　　　   - 0 / 1:  0 - 不强行终止运行中的进程 / 强行终止
DisableWakeEvent　- 0 / 1:  0 - 允许系统事件唤醒计算机 / 不允许

这个 dll 中也包含了用于检索系统电源能力的函数，其中有三个是：
IsPwrHibernateAllowed, IsPwrShutdownAllowed, IsPwrSuspendAllowed，看名字就知道是查什么的了，都不需要参数，但 MS 建议不要使用它们，以后的操作系统可能不再支持，建议使用 GetPwrCapabilities 来替代，这个函数的原型是：
BOOLEAN WINAPI GetPwrCapabilities(
  __out PSYSTEM_POWER_CAPABILITIES lpSystemPowerCapabilities
);
其中用到的 SYSTEM_POWER_CAPABILITIES 结构定义为：

typedef struct {    BOOLEAN PowerButtonPresent;   BOOLEAN SleepButtonPresent;   BOOLEAN LidPresent;   BOOLEAN SystemS1;   BOOLEAN SystemS2;   BOOLEAN SystemS3;   BOOLEAN SystemS4;   BOOLEAN SystemS5;   BOOLEAN HiberFilePresent;   BOOLEAN FullWake;   BOOLEAN VideoDimPresent;   BOOLEAN ApmPresent;   BOOLEAN UpsPresent;   BOOLEAN ThermalControl;   BOOLEAN ProcessorThrottle;   BYTE ProcessorMinThrottle;   BYTE ProcessorMaxThrottle;   BOOLEAN FastSystemS4;   BYTE spare2[3];   BOOLEAN DiskSpinDown;   BYTE spare3[8];   BOOLEAN SystemBatteriesPresent;   BOOLEAN BatteriesAreShortTerm;   BATTERY_REPORTING_SCALE BatteryScale[3];   SYSTEM_POWER_STATE AcOnLineWake;   SYSTEM_POWER_STATE SoftLidWake;   SYSTEM_POWER_STATE RtcWake;   SYSTEM_POWER_STATE MinDeviceWakeState;   SYSTEM_POWER_STATE DefaultLowLatencyWake; } SYSTEM_POWER_CAPABILITIES, *PSYSTEM_POWER_CAPABILITIES;

其中的 HiberFilePresent 成员就代表了系统已启动了休眠功能，而是否支持这些功能就要看其中的几个 SystemSx 成员的值，例如：
支持待机(SystrmS1-3)，支持休眠(S4)，支持软件关机(S5)

所以要判断是否已启用了休眠支持，可以这样写： 

DECLARE Long GetPwrCapabilities IN PowrProf  String @ lpSystemPowerCapabilities m.cSysPwrCap = REPLICATE( CHR(0), 128 ) GetPwrCapabilities( @ m.cSysPwrCap ) RETURN ( 0 != CTOBIN( SUBSTR( m.cSysPwrCap, 9, 1 ), '1rs' ))

至于软关机嘛，对 ExitWindowsEx 函数的介绍实在是太多了，随处可见，不用多写。唯一要注意的就是在基于 NT 内核(NT,2000,XP,Vista)的系统中，调用进程必须拥有 SE_SHUTDOWN_NAME 权限, 这可以通过 AdjustTokenPrivileges 函数来设置。

打开/关闭监视器
----------------------------------------------------------------------------------------------
DECLARE Long SendMessage IN WIN32API Long, Long, Long, Long
SendMessage( _vfp.hWnd, 0x112, 0xf170, 1 )        && 关闭监视器
INKEY(0)
SendMessage( _vfp.hWnd, 0x112, 0xf170, -1 )       && 打开监视器