摘要: 以 Delphi 开发的程序运行在 xp 下时无法自动应用 xp 皮肤风格, 在网上查资料要达到程序自动适应 xp 风格效果很难, 而且大多都是使用一堆外部控件才能达到这样的效果.今天突然发现, 只要在窗体上放一个 TXPManifest (Win32 标签下) 控件, 根本不用再设置其它属生, 程序立刻就可以自动适应 XP 风格了. 这样以前的程序不需任何大的改进即可实现 XP 风格.不过这种方... 阅读全文
posted @ 2010-02-20 09:17 耐心 阅读(626) 评论(0) 推荐(0) 编辑
摘要: 串口通信中需要流控FlowControl来协调A->B传送时的数据传输速率,若A->B的数据传输速率快,B还来不及处理,则B向A发送一个信号,告诉A暂停发送,此谓流控。所谓流控即保证传输双方都能正确地发送和接收数据。 流控分为硬件流控和软件流控。 (1) 硬件流控  DTR(第4引脚),RTS(第7引脚) 计算机上的RS-232端  DSR(第6引脚),CTS(第8引脚) 被控设备端的... 阅读全文
posted @ 2010-02-20 08:38 耐心 阅读(2177) 评论(0) 推荐(0) 编辑
摘要: 常用有功电表有0.5、1.0、2.0三个准确度等级。0.5级电表允许误差在±0.5%以内;1.0级电表允许误差在±1%以内;2.0级电表允许误差在±2%以内。一般居民客户为Ⅴ类电能计量装置,使用的有功电表的准确度等级不低于2.0级;而月平均用电量在100万kW.h及以上的大电力客户为Ⅰ类电能计量装置,使用的有功电表的准确度等级不低于0.5级。本篇文章来源于... 阅读全文
posted @ 2010-02-19 19:55 耐心 阅读(6202) 评论(0) 推荐(0) 编辑
摘要: 1.Unsatisfied forward or external declaration在TForm1中声明了一个函数fun(),在实现时的函数名不能只用fun(),而必须用TForm1.fun(),否则就会出现此错误。[代码] 阅读全文
posted @ 2010-02-18 20:36 耐心 阅读(324) 评论(0) 推荐(0) 编辑
摘要: 在计算二进制算术累加和校验码时,下面一段函数function CalcChecksum(Cmd:string): Integer; {计算16进制和校验方式}var i: Integer;begin result := 0; for i := 1 to Length(Cmd) do begin result := result + Integer(Cmd[i]); {此处的Integer能... 阅读全文
posted @ 2010-02-17 09:34 耐心 阅读(1197) 评论(0) 推荐(0) 编辑
摘要: ASCII表 阅读全文
posted @ 2010-02-17 08:53 耐心 阅读(391) 评论(1) 推荐(0) 编辑
摘要: (1) 字符串//最常用的 stringvar str: string; {定义}begin str := '万一'; {赋值} ShowMessage(IntToStr(Length(str))); {长度是: 4} str:='AA'; ShowMessage(IntToStr(Length(str)));{长度是: 2} str:=#$AA; ShowMessage(IntTo... 阅读全文
posted @ 2010-02-17 08:30 耐心 阅读(804) 评论(0) 推荐(0) 编辑
摘要: 函数功能Chr将一个有序数据转换为一个ASCII字符Ord将一个有序类型值转换为它的序号Round转换一个实型值为四舍五入后的整型值Trunc转换一个实型值为小数截断后的整型值Int返回浮点数的整数部分IntToStr将数值转换为字符串IntToHex将数值转换为十六进制数字符串StrToInt将字符串转换为一个整型数,如字符串不是一个合法的整型将引发异常StrToIntDef将字符串转换为一个整... 阅读全文
posted @ 2010-02-17 07:58 耐心 阅读(226) 评论(0) 推荐(0) 编辑
摘要: KW和MW的关系,K代表千,即10^3倍 ,M代表兆,即10^6倍所以你所问的有如下关系:1MW[兆瓦]=1,000kW[千瓦]焦作电厂6台22万KW机组,即6台220MW机组 阅读全文
posted @ 2010-02-17 00:21 耐心 阅读(5889) 评论(0) 推荐(0) 编辑
摘要: [代码] 阅读全文
posted @ 2010-02-17 00:18 耐心 阅读(164) 评论(0) 推荐(0) 编辑