文档章节

WinAPI: GetSystemPowerStatus - 获取系统电源状态的信息

涂孟超
 涂孟超
发布于 2014/09/26 15:34
字数 199
阅读 19
收藏 0
//声明
GetSystemPowerStatus(
  var lpSystemPowerStatus: TSystemPowerStatus {TSystemPowerStatus 结构}
): BOOL;

//TSystemPowerStatus 是 _SYSTEM_POWER_STATUS 结构的重定义:
_SYSTEM_POWER_STATUS = packed record
  ACLineStatus : Byte;         {0:电源断电; 1:电源正常; 255:电源状态未知}
  BatteryFlag : Byte;          {1:电量充足; 2:电量低; 4:电池基本耗尽; 8:充电; 128:没有电池; 255:电池状态未知}
  BatteryLifePercent : Byte;   {0..100:所剩电量百分数; 255:未知}
  Reserved1 : Byte;            {保留, 须为 0}
  BatteryLifeTime : DWORD;     {电池剩余能量; -1 表示未知}
  BatteryFullLifeTime : DWORD; {电池总能量; -1 表示未知}
end;

 
 
 
 
 

 

 

  
//举例: procedure TForm1.FormCreate(Sender: TObject); var Power: TSystemPowerStatus; begin GetSystemPowerStatus(Power); Memo1.Clear; with Memo1.Lines do begin Add(Format('电源状态: %d',[Power.ACLineStatus])); Add(Format('电池状态: %d',[Power.BatteryFlag])); Add(Format('电量百分比: %d',[Power.BatteryLifePercent])); Add(Format('剩余能量: %d',[Power.BatteryLifeTime])); Add(Format('总能量: %d',[Power.BatteryFullLifeTime])); end; end;
//效果图:

本文转载自:http://www.cnblogs.com/del/archive/2008/02/13/1067834.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2011
码字总数 14107
作品 0
深圳
程序员
私信 提问
在桌面上显示笔记本电脑的电池容量

最近我用笔记本发现电池容量的notifyicon经常不会正常出现(虽然设置了始终显示),并且我以前在PDA软件上写过显示电池容量的功能,所以可以写一个在桌面上显示电量的轻量级程序。查询电量主...

hoodlum1980
2007/11/23
0
0
从 Linux 终端查看笔记本电池状态和等级的 5 个方法

我们可以轻松地通过图形化界面查看当前电量百分比、是否在充电以及当前电量还可以使用多长时间等电池状态,但是却无法查看电池健康度等相关信息。 在这篇文章就是为了解决这些问题。 在 Linu...

作者: Magesh Maruthamuthu
2018/12/16
0
0
vc编程的ime输入法菜单开发

WINDOWS 下 IME 编程 IME 编程心得 第一章 Windows9x 系统下汉字输入法的基本原理 第二章 Windows9x 系统提供的 ime 管理函数 第三章 ime 文件中必须使用的结构 自由拼音输入法的测试 输入法...

crossmix
2014/12/07
0
3
HP服务器Linux下hpacucli常用命令

HP服务器官方管理工具hpacucli,通过该工具可以查看HP服务器的Raid状态是否正常(如果Raid卡出问题,会影响数据的读写速度),服务器硬盘是否正常(如果硬盘坏掉,严重的情况会丢失数据),服...

justin_peng
2017/02/05
0
0
IBM X系列服务器通过sysmgmt接口查看日志

IBM服务器出现一些故障时。除了面板外,还可以通过sys mgmt接口来查看ibm服务器硬件日志。 IBM X系列服务器提供了Integrated Management Module(IMM)集成管理模块,可以比较方便的监控服务...

科技小能手
2017/11/12
0
0

没有更多内容

加载失败,请刷新页面

加载更多

聊聊flink TableEnvironment的scan操作

序 本文主要研究一下flink TableEnvironment的scan操作 实例 //Scanning a directly registered tableval tab: Table = tableEnv.scan("tableName")//Scanning a table from a registered......

go4it
25分钟前
2
0
JS检测移动端横竖屏的代码

移动端的设备提供了一个事件:orientationChange事件 这个事件是苹果公司为safari中添加的。以便开发人员能够确定用户何时将设备由横向查看切换为纵向查看模式。 在设备旋转的时候,会触发这...

不负好时光
26分钟前
2
0
ArrayList 优化

优化是 基于数据的大小 当数据量过大 (内存能抗住) 性能达到瓶颈才需要针对性的做优化 contain 优化 可以转换为set add 大批量操作 先预估数据量 调用 `ensureCapacity(int minCapacity)` ...

NotFound403
27分钟前
3
0
Lifecycle Aware Data Loading with Architecture Components

In my previous blog post, I talked about how you can use Loaders to load data in a way that automatically handles configuration changes. With the introduction of Architecture Co......

SuShine
27分钟前
1
0
性能测试汇总

服务器带宽测试 iperf测试带宽 wget -c https://codeload.github.com/esnet/iperf/tar.gz/3.1.6 tar zxvf 3.1.6cd iperf*yum install gcc./configure --prefix=/usr/local/iperf#指定......

以谁为师
32分钟前
2
0

没有更多内容

加载失败,请刷新页面

加载更多

返回顶部
顶部