F
funboy88
Unregistered / Unconfirmed
GUEST, unregistred user!
我买了你的那本语音编程书!可是你上面对于发送传真的,没有详细说,很笼统的,弄得我没法下手,现在手上正在做一个用语音MODEM发送传真的软件!
现在的问题是这样的,合同订单打印FORM里加入发送传真的功能,就是中一个BUTTON,点它就真接发送打印的内容到对方传真机去,打印是利用RMFormReport控件的,它的printcontrol设置成一个PANLE,打印是打印这个面板上所有内容的,现在想实现的功能就是发传真时也发送这个面板上一模一样的内容,
我按照你书上说的,安装了虚拟传真机,安装OK,可是用它打印测试页的时候出错,打印不了(不是说打不出来,而是一点打印测试页那个BUTTON,就出错,而真正的打印机没有问题)不知道你遇到这个问题过没有,
这个发传真的控件是不是这个用的,发传真时把要发的内容先打印输出到这个专用虚拟传真机上,而TApdFaxDriverInterface控件则可以把虚拟传真机上的打印文档,捕获到,从而触发onDocEnd和ONDOCSTART两个事件,在这两个事件中再利用 tApdSendFax控件发送传真内容到对方传真机去!代码如下 procedure TF_PrintInfo.ApdFaxDriverInterface1DocEnd(Sender: TObject);
begin
if messagedlg('发送传真嘛?',mtInformation,[mbYES, mbNo],0)=mrYES then
begin
ApdSendFax1.FaxFile:=ApdFaxDriverInterface1.FileName;
ApdSendFax1.PhoneNumber:='0755-2234816';
ApdSendFax1.StartTransmit;
end;
end;
这种方法不知道对不对!
我很急,请见信后有时间早回信,QQ联系:24692894 email:zhusx@163.net
现在的问题是这样的,合同订单打印FORM里加入发送传真的功能,就是中一个BUTTON,点它就真接发送打印的内容到对方传真机去,打印是利用RMFormReport控件的,它的printcontrol设置成一个PANLE,打印是打印这个面板上所有内容的,现在想实现的功能就是发传真时也发送这个面板上一模一样的内容,
我按照你书上说的,安装了虚拟传真机,安装OK,可是用它打印测试页的时候出错,打印不了(不是说打不出来,而是一点打印测试页那个BUTTON,就出错,而真正的打印机没有问题)不知道你遇到这个问题过没有,
这个发传真的控件是不是这个用的,发传真时把要发的内容先打印输出到这个专用虚拟传真机上,而TApdFaxDriverInterface控件则可以把虚拟传真机上的打印文档,捕获到,从而触发onDocEnd和ONDOCSTART两个事件,在这两个事件中再利用 tApdSendFax控件发送传真内容到对方传真机去!代码如下 procedure TF_PrintInfo.ApdFaxDriverInterface1DocEnd(Sender: TObject);
begin
if messagedlg('发送传真嘛?',mtInformation,[mbYES, mbNo],0)=mrYES then
begin
ApdSendFax1.FaxFile:=ApdFaxDriverInterface1.FileName;
ApdSendFax1.PhoneNumber:='0755-2234816';
ApdSendFax1.StartTransmit;
end;
end;
这种方法不知道对不对!
我很急,请见信后有时间早回信,QQ联系:24692894 email:zhusx@163.net