Inviare fax tramite Microsoft FaxServer con delphi

3 febbraio 2004 in Codice by Massimiliano | No comments

uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var
  mFax,mFaxDoc: Variant;
begin
  mFax := CreateOleObject('FaxServer.FaxServer');
  mFax.Connect('mypc'); // PC che mette a disposizione il servizio FAX,                                 
  mFaxDoc := mFax.CreateDocument('c:pp.doc');
  mFaxDoc.FaxNumber     :='02555555330';
  mFaxDoc.RecipientName := 'Mio Cliente';
  mFaxDoc.Send;
  mFax.Disconnect;
end;

Altri articoli di interesse:

  1. Come utilizzare google da delphi Come primo passo è necessario ottenere una google api key...
  2. Delphi per Vista e Delphi per PHP. Rumors. Dal blog di Marco Cantù apprendo che si sono avute...
  3. Delphi 2007 per Win32 e Delphi 2007 for PHP I rumors sulle nuove versioni di Delphi sono diventati ufficiali....
  4. Delphi 2007 e Windows 7 64bit: Assertion failure in thread32.cpp line 412 Su windows 7 64 bit sia delphi 2007 che delphi...

Tags: