Class TnrComm (unit nrcomm) |
Inherits from
TComponent
constructor Create(AOwner: TComponent);
- ================================================================ =============== TnrComm ==================================
procedure ConfigDialog;
восстановим .
destructor Destroy;
function GetData(Buffer:PChar;Size:cardinal;Wait:boolean):cardinal;
procedure ResetModem;
вызов диалога конфигурации СОМ-порта
procedure SendChar(Ch:Char);
wait read
procedure SendData(Buff:PChar;N:longint);
procedure SendString(S:string);
procedure DoRecived(Sender:TObject;Recived:Cardinal);
function GetDCB:TDCB;
procedure SetDCB(Value:TDCB);
сброс устройства поток для событий от порта
procedure SetActive(Value:boolean);
property Active : boolean
property Boud : TBaudRate
property CommTimeout : dword
property ComPort : TComPort
property Terminal : TMemo
property TerminalOnLine : boolean
property DCB : TDCB
event OnActive : TNotifyEvent
event OnEoLn : TOnAfterTerminal
event OnRecive : TRecivedEvent
ActiveComm : boolean;
EventThread : TnrCommThread;
handle of CommPort Device
hCom : THandle;
OnLine : boolean;
CommCfg : PCommConfig;
CommProp : PCommProp;
CommTimeouts : TCommTimeouts;
fBoud : TBaudRate;
fComPort : TComPort;
FMemo : TMemo;
OL : TOverlapped;
FDCB:TDCB; // DCB structure of CommPort Device
FOnActive : TNotifyEvent;
FOnAfterTerminal : TOnAfterTerminal;
FOnRecive : TRecivedEvent;
FWait : dword;
constructor Create(AOwner: TComponent);
================================================================ =============== TnrComm ==================================
procedure ConfigDialog;
восстановим ...
destructor Destroy;
function GetData(Buffer:PChar;Size:cardinal;Wait:boolean):cardinal;
procedure ResetModem;
вызов диалога конфигурации СОМ-порта
procedure SendChar(Ch:Char);
wait read
procedure SendData(Buff:PChar;N:longint);
procedure SendString(S:string);
procedure DoRecived(Sender:TObject;Recived:Cardinal);
function GetDCB:TDCB;
procedure SetDCB(Value:TDCB);
сброс устройства поток для событий от порта
procedure SetActive(Value:boolean);
property Active : boolean
property Boud : TBaudRate
property CommTimeout : dword
property ComPort : TComPort
property Terminal : TMemo
property TerminalOnLine : boolean
property DCB : TDCB
event OnActive : TNotifyEvent
event OnEoLn : TOnAfterTerminal
event OnRecive : TRecivedEvent
ActiveComm : boolean;
EventThread : TnrCommThread;
handle of CommPort Device
hCom : THandle;
OnLine : boolean;
CommCfg : PCommConfig;
CommProp : PCommProp;
CommTimeouts : TCommTimeouts;
fBoud : TBaudRate;
fComPort : TComPort;
FMemo : TMemo;
OL : TOverlapped;
FDCB:TDCB; // DCB structure of CommPort Device
FOnActive : TNotifyEvent;
FOnAfterTerminal : TOnAfterTerminal;
FOnRecive : TRecivedEvent;
FWait : dword;