Solved

Transfering files via modem connection using AsyncPro

Posted on 2004-09-10
3
231 Views
Last Modified: 2010-05-18
Hi,

Can anybody help me with some sample code to transfer file via modem connection using AsyncPro (TApdTapiDevice, TApdProtocol)

Thanks,
Partha
0
Comment
Question by:perthg
  • 2
3 Comments
 
LVL 7

Expert Comment

by:LRHGuy
ID: 12031378
I'm assuming you now how to drop a comport, protocol and tapi components on a form, and make all the propert connections.

Once you've done that...you hook the Tapi up to start transmitting at the right moment:

procedure TForm1.ApdTapiDevice1TapiPortOpen(Sender: TObject);
begin
  ApdProtocol1.StartTransmit;
end;


This button click would get Tapi dialing out, then start the protocol when connected:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ApdTapiDevice1.Dial('212-123-3232');
end;

0
 

Author Comment

by:perthg
ID: 12032313
Thanks, but How do I transfer a file?
0
 
LVL 7

Accepted Solution

by:
LRHGuy earned 250 total points
ID: 12032461
If you drop the comport, tapi, and protocol components on the form, then set the properties.

The protocal property has two settings of interest:

  filename    (the file to send)
  protocol    (the protocol to use...like zmodem)

zmodem is a good idea, depending on where your connecting to, since it can 'autostart' on the other end, if supported.

Calling the StartTransmit method will send the file.
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

A lot of questions regard threads in Delphi.   One of the more specific questions is how to show progress of the thread.   Updating a progressbar from inside a thread is a mistake. A solution to this would be to send a synchronized message to the…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…
Sending a Secure fax is easy with eFax Corporate (http://www.enterprise.efax.com). First, just open a new email message. In the To field, type your recipient's fax number @efaxsend.com. You can even send a secure international fax — just include t…

911 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

21 Experts available now in Live!

Get 1:1 Help Now