Class TCustomComm (unit Async32)

Inherits from

TComponent

Constructors


constructor Create(AOwner: TComponent);

TCustomComm


Functions

procedure Close;


destructor Destroy;


function Enabled: Boolean;


function InQueCount: Integer;


procedure Open;


function OutQueCount: Integer;


procedure PurgeIn;


procedure PurgeOut;


function Read(var Buf; Count: Integer): Integer;


procedure SetBREAKState(State: Boolean);


procedure SetDTRState(State: Boolean);

Comm escape functions

procedure SetRTSState(State: Boolean);


procedure SetXONState(State: Boolean);


function Write(const Buf; Count: Integer): Integer;


procedure CreateHandle;


procedure DestroyHandle;


procedure EventStateChange(Event: Integer);


procedure ConfigureHandshaking(var DCB: TDCB);


procedure EscapeComm(Flag: Integer);


function GetModemState(Index: Integer): Boolean;


function GetProviderSubtype: Integer;


procedure HandleCommEvent(Sender: TObject; Status: dword);


procedure SetBaudRate(Value: TBaudRate);


procedure SetCharsTimeout(Value: Integer);


procedure SetDatabits(Value: TDatabits);


procedure SetDeviceName(Value: string);


procedure SetFlowControl(Value: TFlowControl);


procedure SetMonitorEvents(Value: TCommEventType);


procedure SetOptions(Value: TCommOptions);


procedure SetParity(Value: TParity);


procedure SetReadBufSize(Value: Integer);


procedure SetStopbits(Value: TStopBits);


procedure SetWriteBufSize(Value: Integer);


procedure UpdateDataControlBlock;


Properties

property CTS : Boolean

Comm status flags

property DSR : Boolean


property Handle : THandle

DeviceHandle property

property ProviderSubtype : Integer


property RING : Boolean


property RLSD : Boolean


property BaudRate : TBaudRate


property CharsTimeOut : Integer


property Databits : TDatabits


property DeviceName : string


property EventChars : TCommEventChars


property FlowControl : TFlowControl


property MonitorEvents : TCommEventType


property Options : TCommOptions


property Parity : TParity


property ReadBufSize : Integer


property Stopbits : TStopbits


property WriteBufSize : Integer


Events

event OnBreak : TNotifyEvent

Comm Signal Events

event OnCTS : TNotifyEvent


event OnDSR : TNotifyEvent


event OnError : TCommErrorEvent


event OnRing : TNotifyEvent


event OnRLSD : TNotifyEvent


event OnRxChar : TCommRxCharEvent


event OnRxFlag : TNotifyEvent


event OnTxEmpty : TNotifyEvent


Variables

FBaudRate : TBaudRate;


FCharsTimeout : Integer;


FCommConfig : TCommConfig;


FCommEventThread : TCommEventThread;


FComStat : TComStat;


FDatabits : TDatabits;


FDCB : TDCB;


FDeviceName : string;


FErrors : dword;


FEventChars : TCommEventChars;


FFlowControl : TFlowControl;


FHandle : THandle;


FMonitorEvents : TCommEventType;


FOnBreak : TNotifyEvent;


FOnCTS : TNotifyEvent;


FOnDSR : TNotifyEvent;


FOnError : TCommErrorEvent;


FOnRing : TNotifyEvent;


FOnRLSD : TNotifyEvent;


FOnRxChar : TCommRxCharEvent;


FOnRxFlag : TNotifyEvent;


FOnTxEmpty : TNotifyEvent;


FOptions : TCommOptions;


FParity : TParity;


FReadBufSize : Integer;


FReadOS : TOverlapped;


FStopbits : TStopbits;


FWriteBufSize : Integer;


FWriteOS : TOverlapped;



Constructors


constructor Create(AOwner: TComponent);

TCustomComm


Functions


procedure Close;


destructor Destroy;


function Enabled: Boolean;


function InQueCount: Integer;


procedure Open;


function OutQueCount: Integer;


procedure PurgeIn;


procedure PurgeOut;


function Read(var Buf; Count: Integer): Integer;


procedure SetBREAKState(State: Boolean);


procedure SetDTRState(State: Boolean);

Comm escape functions


procedure SetRTSState(State: Boolean);


procedure SetXONState(State: Boolean);


function Write(const Buf; Count: Integer): Integer;


procedure CreateHandle;


procedure DestroyHandle;


procedure EventStateChange(Event: Integer);


procedure ConfigureHandshaking(var DCB: TDCB);


procedure EscapeComm(Flag: Integer);


function GetModemState(Index: Integer): Boolean;


function GetProviderSubtype: Integer;


procedure HandleCommEvent(Sender: TObject; Status: dword);


procedure SetBaudRate(Value: TBaudRate);


procedure SetCharsTimeout(Value: Integer);


procedure SetDatabits(Value: TDatabits);


procedure SetDeviceName(Value: string);


procedure SetFlowControl(Value: TFlowControl);


procedure SetMonitorEvents(Value: TCommEventType);


procedure SetOptions(Value: TCommOptions);


procedure SetParity(Value: TParity);


procedure SetReadBufSize(Value: Integer);


procedure SetStopbits(Value: TStopBits);


procedure SetWriteBufSize(Value: Integer);


procedure UpdateDataControlBlock;


Properties


property CTS : Boolean

Comm status flags


property DSR : Boolean


property Handle : THandle

DeviceHandle property


property ProviderSubtype : Integer


property RING : Boolean


property RLSD : Boolean


property BaudRate : TBaudRate


property CharsTimeOut : Integer


property Databits : TDatabits


property DeviceName : string


property EventChars : TCommEventChars


property FlowControl : TFlowControl


property MonitorEvents : TCommEventType


property Options : TCommOptions


property Parity : TParity


property ReadBufSize : Integer


property Stopbits : TStopbits


property WriteBufSize : Integer


Events


event OnBreak : TNotifyEvent

Comm Signal Events


event OnCTS : TNotifyEvent


event OnDSR : TNotifyEvent


event OnError : TCommErrorEvent


event OnRing : TNotifyEvent


event OnRLSD : TNotifyEvent


event OnRxChar : TCommRxCharEvent


event OnRxFlag : TNotifyEvent


event OnTxEmpty : TNotifyEvent


Variables


FBaudRate : TBaudRate;


FCharsTimeout : Integer;


FCommConfig : TCommConfig;


FCommEventThread : TCommEventThread;


FComStat : TComStat;


FDatabits : TDatabits;


FDCB : TDCB;


FDeviceName : string;


FErrors : dword;


FEventChars : TCommEventChars;


FFlowControl : TFlowControl;


FHandle : THandle;


FMonitorEvents : TCommEventType;


FOnBreak : TNotifyEvent;


FOnCTS : TNotifyEvent;


FOnDSR : TNotifyEvent;


FOnError : TCommErrorEvent;


FOnRing : TNotifyEvent;


FOnRLSD : TNotifyEvent;


FOnRxChar : TCommRxCharEvent;


FOnRxFlag : TNotifyEvent;


FOnTxEmpty : TNotifyEvent;


FOptions : TCommOptions;


FParity : TParity;


FReadBufSize : Integer;


FReadOS : TOverlapped;


FStopbits : TStopbits;


FWriteBufSize : Integer;


FWriteOS : TOverlapped;