在WIN32中的串口通讯（Delphi）
在WIN32中的串口通讯（Delphi）
由在WIN32操作系统中禁止应用程序象DOS中那样直接访问计算机硬件，因此，无法象以前那样采用中断读写串口。但是在WIN32中我们可发采用两种方法访问串口：1、使用VB中的MSCOMM串口控件；2、采用API函数，本文主要介绍采用API函数实现串口通讯。
由于WM_COMMNOTIFY消息已被取消，故本文自定义了WM_COMMNOTIFY消息，在WIN32中几个常用的串口通信API函数如下：
CreateFile 打开串口
CloseHandle 关闭句柄，用于释放内存
SetComm 设置缓冲区大小
ReadFile 读串口
WriteFile 写串口
SetCommState 设置通信参数
GetCommState 获取通信参数
ClearCommError 清除串口错误并获取读、写缓冲区当前字节数
SetCommMask 设置串口屏蔽事件
PurgeComm 消除串口读写缓冲区的所有字符，用以终止悬而未决的读写操作。
PostMessage 发送消息
WaitCommEvent 等待串口事件发生
由于采用多线程操作串口，还用到以下API函数
CreateEvent 建立同步事件
ResetEvent 同步事件复位
SetEvent 同步事件置位
WaitForSingleObject 等待同步事件
GetOverLappedResult 获取并行操作的结果]
GetLastError 获取错误代码
由于WIN32取消了WM_COMMNOTIFY，所以必须自己创建，如果编写串口控件，那么应该在串口事件发生时即WaitCommEvent返回True时或GetLastError返回结果为Error_IO_Pending，且GetOverLappedResult返回True时触发读串口事件。比如：串口控件为Tcomm,那么在串口事件发生时调用Tcomm.RXChar方法，Tcomm.RXChar定义如下：
Procedure Tcomm.RXChar;
begin
if Assigned(FOnRXChar) then FonRxChar(self);
SetEvent(Post_Event);
End;
Delphi的强大和多线程支持，使得实现串口通信非常方便简单，首先，用CreateFile打开串口,其次，通过GetCommState获取串口参数，并用SetCommState设置串口参数，然后创建线程用以监视串口，此后就可以进行串口通信了，最后用Closehandle 释放所有资源（切记，以免死机）。
在这其中，使用到一个重要的结构DCB，其常用的一些定义如下：
BaudRate:波特率，可直接�
相关文档：
参考资料
李战.《悟透delphi》，第1章“DELPHI的原子世界”
“探索Delphi类与对象的内存结构”
基本知识
动态内存与静态内存
当程序运行时，系统首先将所有数据装载入内存，完成初始化，然后从入口地址开始执行代码。
程序装载后即存在于内存空间中的数据我们称之为静态内存，运行过程中 ......
本书以实例为主线，辅以必要的技术背景要点来讲解Delphi 6．0编程的精髓；本书实例偏重于多媒体和网络程序开发，其中涉及到OpenGL、Indy组件、XML、Web Broker和WebSnap等技术。本书还讲述了Delphi中的SQL编程，在两个短小精练的程序中充分运用了Delphi数据开发技术，包括BDE组件的ADO组件的使用。通过本书，让读者在编程� ......
Delphi中 Round函数有个Bug
一旦参数是形如 XXX.5这样的数时
如果 XXX 是奇数 那么就会 Round up
如果 XXX 是偶数 那么就会 Round down
例如 Round(17.5)=18
但是 Round(12.5)=12
下面的函数即可纠正这个 Bug 但是是临时性的
执行 DoRound(12.5) 结果为 13 正确
function DoRound(Value: Extended): Int64;
......
DELPHI参数几个概念上的区别 收藏
引用参数：
引用参数用var关键字标示
procedure DoubleTheValue (var Value: Integer);
begin
Value := Value * 2;
end;在这种情况下，参数既把一个值传递给过程，又把新值返回给调用过程的代码。当你执行完以下代码时：
var
X: Integer;
begin
X : ......
