Example

Top  Previous  Next

Example to use fax function:

 

//It creates a fax to sent to Mr Jhonson

UnFax:=FaxCreate('Acme Srl,'From Mr. Smith to Mr. Jhonson - 15/03/2001 - URGENT');

 

//It adds to fax a text page

FaxAddFile(UnFax,'c:\firstpage.txt',0,True);

 

//It adds to fax a page as image

FaxAddFile(UnFax,'c:\secondpage.bmp',1,True);

 

//It sends fax to number: 0212345678

if FaxSend(UnFax,1,'0212345678')

 

// if fax is sent a message is shown

then ShowMessage('Fax is sent !');

 

//It destroys the created fax

FaxDestroy(UnFax);

 

Note

To use this example have to substitute the existing file and phone number.