| Class TTnCnx (unit TnCnx) |
TComponent
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure Close;
procedure Connect;
destructor Destroy;
procedure DontOption(chOption : Char);
procedure DoOption(chOption : Char);
function IsConnected : Boolean;
procedure Pause;
procedure Resume;
function Send(Data : Pointer; Len : Integer) : integer;
function SendStr(Data : String) : integer;
procedure WillOption(chOption : Char);
procedure WontOption(chOption : Char);
procedure AddChar(Ch : Char);
procedure Answer(chAns : Char; chOption : Char);
procedure Display(Str : String);
procedure FlushBuffer;
function GetState : TSocketState;
procedure NegociateOption(chAction : Char; chOption : Char);
procedure NegociateSubOption(strSubOption : String);
procedure Notification(AComponent: TComponent; Operation: TOperation);
procedure ReceiveChar(Ch : Char);
procedure SocketDataAvailable(Sender: TObject; Error : word);
procedure SocketSessionClosed(Sender: TObject; Error : word);
procedure SocketSessionConnected(Sender: TObject; Error : word);
procedure WndProc(var MsgRec: TMessage);| Properties |
property Host : String
property LocalEcho : Boolean
property Location : String
property Port : String
property TermType : String
property Handle : HWND
property State : TSocketState| Events |
event OnDataAvailable : TTnDataAvailable
event OnDisplay : TTnDisplay
event OnEndOfRecord : TNotifyEvent
event OnLocalEcho : TNotifyEvent
event OnSendLoc : TNotifyEvent
event OnSessionClosed : TTnSessionClosed
event OnSessionConnected : TTnSessionConnected
event OnTermType : TNotifyEvent| Variables |
Socket : TWSocket;
FBuffer : array [0..2048] of char;
FBufferCnt : Integer;
FHost : String;
FLocalEcho : Boolean;
FLocation : String;
FOnDataAvailable : TTnDataAvailable;
FOnDisplay : TTnDisplay;
FOnEOR : TNotifyEvent;
FOnLocalEcho : TNotifyEvent;
FOnSendLoc : TNotifyEvent;
FOnSessionClosed : TTnSessionClosed;
FOnSessionConnected : TTnSessionConnected;
FOnTermType : TNotifyEvent;
FPort : String;
FTermType : String;
FTType : Boolean;
FWindowHandle : HWND;
LocalBinMode : Boolean;
RemoteBinMode : Boolean;
Spga : Boolean;| Constructors |
constructor Create(AOwner: TComponent);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
| Functions |
procedure Close;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Connect;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
destructor Destroy;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure DontOption(chOption : Char);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure DoOption(chOption : Char);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function IsConnected : Boolean;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Pause;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Resume;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function Send(Data : Pointer; Len : Integer) : integer;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function SendStr(Data : String) : integer;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure WillOption(chOption : Char);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure WontOption(chOption : Char);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure AddChar(Ch : Char);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Answer(chAns : Char; chOption : Char);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Display(Str : String);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure FlushBuffer;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
function GetState : TSocketState;* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure NegociateOption(chAction : Char; chOption : Char);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure NegociateSubOption(strSubOption : String);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure Notification(AComponent: TComponent; Operation: TOperation);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure ReceiveChar(Ch : Char);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure SocketDataAvailable(Sender: TObject; Error : word);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure SocketSessionClosed(Sender: TObject; Error : word);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure SocketSessionConnected(Sender: TObject; Error : word);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
procedure WndProc(var MsgRec: TMessage);* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
| Properties |
property Host : String
property LocalEcho : Boolean
property Location : String
property Port : String
property TermType : String
property Handle : HWND
property State : TSocketState| Events |
event OnDataAvailable : TTnDataAvailable
event OnDisplay : TTnDisplay
event OnEndOfRecord : TNotifyEvent
event OnLocalEcho : TNotifyEvent
event OnSendLoc : TNotifyEvent
event OnSessionClosed : TTnSessionClosed
event OnSessionConnected : TTnSessionConnected
event OnTermType : TNotifyEvent| Variables |
Socket : TWSocket;
FBuffer : array [0..2048] of char;
FBufferCnt : Integer;
FHost : String;
FLocalEcho : Boolean;
FLocation : String;
FOnDataAvailable : TTnDataAvailable;
FOnDisplay : TTnDisplay;
FOnEOR : TNotifyEvent;
FOnLocalEcho : TNotifyEvent;
FOnSendLoc : TNotifyEvent;
FOnSessionClosed : TTnSessionClosed;
FOnSessionConnected : TTnSessionConnected;
FOnTermType : TNotifyEvent;
FPort : String;
FTermType : String;
FTType : Boolean;
FWindowHandle : HWND;
LocalBinMode : Boolean;
RemoteBinMode : Boolean;
Spga : Boolean;