object ServerForm: TServerForm Left = 150 Top = 169 Caption = 'ServerForm' ClientHeight = 101 ClientWidth = 374 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnShow = FormShow TextHeight = 13 object InfoLabel: TLabel Left = 72 Top = 8 Width = 44 Height = 13 Caption = 'InfoLabel' end object DisconnectButton: TButton Left = 72 Top = 40 Width = 75 Height = 25 Caption = '&Disconnect' Default = True Enabled = False TabOrder = 0 OnClick = DisconnectButtonClick end object SrvSocket: TWSocket LineEnd = #13#10 Port = 'telnet' Proto = 'tcp' LocalAddr = '0.0.0.0' LocalAddr6 = '::' LocalPort = '0' KeepAliveOnOff = wsKeepAliveOnSystem KeepAliveTime = 30000 KeepAliveInterval = 1000 SocksLevel = '5' ExclusiveAddr = False ComponentOptions = [] ReqVerLow = 1 ReqVerHigh = 1 OnSessionAvailable = SrvSocketSessionAvailable SocketErrs = wsErrTech Left = 16 Top = 8 end object CliSocket: TWSocket LineEnd = #13#10 Port = 'telnet' Proto = 'tcp' LocalAddr = '0.0.0.0' LocalAddr6 = '::' LocalPort = '0' KeepAliveOnOff = wsKeepAliveOnSystem KeepAliveTime = 30000 KeepAliveInterval = 1000 SocksLevel = '5' ExclusiveAddr = False ComponentOptions = [] ReqVerLow = 1 ReqVerHigh = 1 OnSessionClosed = CliSocketSessionClosed SocketErrs = wsErrTech Left = 16 Top = 56 end end