基于Delphi源码监控显示电源电池信息,电源状态有3种：脱机、联机、未知；电池状态有6种：高、低、临界、充电、无系统电池、未知；剩余电池电量，通过IntToStr(lpsps.BatteryLifePercent*100)+ 来获得，这里要注意选择标志的用法，电池剩余时间用 +IntToStr(lpsps.BatteryLifeTime)+ 秒 来计算，电池总使用时间用 +IntToStr(lpsps.BatteryFullLifeTime)+ 秒 来计算。程序还可启动休眠状态。若在台机上运行