|
Async Professional 是一套全面的通信相关开发包,包含串口、TAPI、微软Speech API、支持传真、终端仿真、VOIP等等。
delphi 2010
1.下载http://sourceforge.net/projects/tpapro/
2.解压,在delphi2010下找到d:\thirdparty\tpapro_5.00\packages\d2010在其中建立子文件夹
如d:\thirdparty\tpapro_5.00\packages\d2010\dcu,用于存放编译后的dcu文件
3.双击打开asyncprogp.groupproj工程组文件在asyncpro_d2010.bpl右键options将$(dcp)清空,将$(bpl)清空
将$(dcu)改为dcu。在dclasyncpro_d2010.bpl右击,在options下将$(dcp)清空,将$(bpl)清空,将$(dcu)改为dcu
4.在asyncprogp右击,选compile all,在dclasyncpro_d2010.bpl右击选install
5. 在environment options菜单下的library标签下的library path中加入①d:\thirdparty\tpapro_5.00\packages\d2010\dcu ②d:\thirdparty\tpapro_5.00\design ③d:\thirdparty\tpapro_5.00\run
6. 大功告成!
delphi 7
1.解压,创建d:\thirdparty\tpapro_5.00\packages\d7\dcu中的dcu目录
2.双击asyncprogp.bpg,在view菜单下选择project manager在asyncpro_d7.bpl上右击选options找到
其中的directories/conditionals标签,将$(dcp)清空,将$(bpl)清空,将$(dcu)改为dcu。
3.右击dclasyncpro_d7.bpl,选options找到其中的directories/conditionals标签,将$(dcp)清空,
将$(bpl)清空,将$(dcu)改为dcu。
4.在project菜单下找到complie asyncpro,然后右击dclasyncpro_d7.bpl,选install
5. 在environment options菜单下的library标签下的library path中加入①d:\thirdparty\tpapro_5.00\packages\d7\dcu ②d:\thirdparty\tpapro_5.00\design ③d:\thirdparty\tpapro_5.00\run
6.大功告成!
![](http://cache.amobbs.com/bbs_upload782111/files_46/ourdev_686229FVFKOK.jpg)
(原文件名:1.jpg)
![](http://cache.amobbs.com/bbs_upload782111/files_46/ourdev_686230IY574O.jpg)
(原文件名:2.jpg)
写了一个简单的 接收单片机发送的数据 感觉比mscomm好用^_^
var
s :string;
procedure TForm1.FormCreate(Sender: TObject);
begin
Memo1.Text:='';
ApdComPort1.ComNumber:=6;
ApdComPort1.Baud:=115200; // //配置端口比特率停止位数据位等
ApdComPort1.Parity :=pNone;
ApdComPort1.DataBits :=8;
ApdComPort1.StopBits:=1;
ApdComPort1.Open :=True;
//ApdComPort1.Logging :=tlOn;
end;
procedure TForm1.ApdComPort1TriggerAvail(CP: TObject; Count: Word);
var
i:Integer;
begin
for i:=1 to Count do
s :=s+ ApdComPort1.GetChar; //接受数据
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
if Length(s)>0 then
begin
Memo1.Text :=s;
s:='';
// ApdComPort1.LogName :='delphi test.txt';
// ApdComPort1.Logging :=tlDump;
end
else
Memo1.Text :='';
end;
也可以在http://sourceforge.net/projects/tpapro/files/tpapro/下载
tpapro_5.00ourdev_686231ZSYTUV.zip(文件大小:9.01M) (原文件名:tpapro_5.00 串口.zip) |
阿莫论坛20周年了!感谢大家的支持与爱护!!
曾经有一段真挚的爱情摆在我的面前,我没有珍惜,现在想起来,还好我没有珍惜……
|