object ServerForm: TServerForm Left = 250 Top = 263 Caption = 'ServerForm' ClientHeight = 266 ClientWidth = 535 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True OnActivate = FormActivate OnCreate = FormCreate OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object Memo: TMemo Left = 0 Top = 0 Width = 535 Height = 225 Align = alTop Lines.Strings = ( 'Memo') TabOrder = 0 end object AboutButton: TButton Left = 360 Top = 232 Width = 75 Height = 25 Caption = '&About' TabOrder = 1 OnClick = AboutButtonClick end object QuitButton: TButton Left = 448 Top = 232 Width = 81 Height = 25 Cancel = True Caption = '&Quit' TabOrder = 2 OnClick = QuitButtonClick end object SrvSocket: TWSocket LineMode = False LineLimit = 65536 LineEnd = #13#10 LineEcho = False LineEdit = False Addr = '0.0.0.0' Port = 'telnet' Proto = 'tcp' LocalAddr = '0.0.0.0' LocalPort = '0' MultiThreaded = False MultiCast = False MultiCastIpTTL = 1 FlushTimeout = 60 SendFlags = wsSendNormal LingerOnOff = wsLingerOn LingerTimeout = 0 KeepAliveOnOff = wsKeepAliveOff KeepAliveTime = 0 KeepAliveInterval = 0 SocksLevel = '5' SocksAuthentication = socksNoAuthentication LastError = 0 ReuseAddr = False ComponentOptions = [] ListenBacklog = 5 ReqVerLow = 1 ReqVerHigh = 1 OnSessionClosed = SrvSocketSessionClosed OnSessionAvailable = SrvSocketSessionAvailable Left = 24 Top = 32 end end