OnRing Event

This event is triggered when a change of the RING signal is detected.

Syntax

OnRing(Sender: TObject; State: Boolean);

OnRing(TObject * Sender, bool State);

Parameters

Sender

Event source.

State

RING signal state.

Code Example

//
// Event handler by example of CTS signal event handler
//
procedure TForm1.FTSPCControl1Cts(Sender: TObject);
begin
	try
	if FTSPCControl1.Cts then
		begin
			// Todo: add your code
		end;
	except
		on e:FTSPCException do
		begin
			application.MessageBox(PChar('Error: ' + 
				inttostr(e.ErrorCode) + ' - ' +
				e.ErrorSource), 'Error!', MB_OK + 
				MB_ICONERROR);
		end;
	end;
end;