This event is triggered when the event character was received and placed in the input buffer. The event character is specified in EventChar property.
| Delphi | OnEventChar(Sender: TObject);
|
|---|---|
| BCBuilder | OnEventChar(TObject * Sender);
|
Sender
Event source.
//
// 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;