Class TfrmTAPIMon (unit MonForm)

Inherits from

TForm

*** TAPI Monitor *** by Davide Moretti This is a TAPI Test It uses TAPI interface to monitor outgoing calls Open this program, and then make a call with Remote Access or something that uses TAPI I used TAPI only to monitor calls, since I am wriing a toll accounting program.

Constructors



Functions

procedure FormClose(Sender: TObject; var Action: TCloseAction);

Terminate TAPI

procedure FormCreate(Sender: TObject);

Disconnected

procedure FormDestroy(Sender: TObject);

Open a line for monitor (here I use first device, normally the modem)

Properties

Events

Variables

Memo1 : TMemo;


line : THLine;


lineApp : THLineApp;

Private declarations


Constructors


Functions


procedure FormClose(Sender: TObject; var Action: TCloseAction);

Terminate TAPI


procedure FormCreate(Sender: TObject);

Disconnected


procedure FormDestroy(Sender: TObject);

Open a line for monitor (here I use first device, normally the modem)


Properties


Events


Variables


Memo1 : TMemo;


line : THLine;


lineApp : THLineApp;

Private declarations