使用AsyncPro在Delphi XE5中传真

时间:2017-07-21 10:10:10

标签: delphi fax

我想通过Windows传真从应用程序自动传真。 Windows Fax使用USB-Faxmodem连接到传真服务器。电话连接是通过POTS建立的。

我使用的是Delphi XE5环境和TurboPower AsyncPro 5.0的组件。 Faxmodem的COM端口是3(我已经检查了这个)。在变量strCall中是应该传真的文本。它看起来很好,但我总是收到错误' ie-badid指定的com端口不存在'。我是否需要其他组件来建立连接或可能是什么原因?

ApdComPort1.ComNumber:= 3;
ApdComPort1.Open:= true;

meoFaxText.Lines.Add(strCall);
meoFaxText.Lines.SaveToFile(ExtractFilePath(Paramstr(0)) + 'outfax.txt');
ApdFaxConverter1.DocumentFile:= ExtractFilePath(Paramstr(0)) + 'outfax.txt';
ApdFaxConverter1.InputDocumentType:= idText;
ApdFaxConverter1.OutFileName:= ExtractFilePath(Paramstr(0)) + 'outfax.apf';
ApdFaxConverter1.ConvertToFile;

ApdSendFax1.FaxFile:= ApdFaxConverter1.OutFileName;
ApdSendFax1.PhoneNumber:= '0123456789';
ApdSendFax1.StartTransmit;

0 个答案:

没有答案