object ClientForm: TClientForm Left = 0 Top = 0 Caption = 'Form1' ClientHeight = 533 ClientWidth = 640 FormFactor.Width = 320 FormFactor.Height = 480 FormFactor.Devices = [Desktop] OnClose = FormClose OnShow = FormShow DesignerMasterStyle = 0 object DisplayMemo: TMemo Touch.InteractiveGestures = [Pan, LongTap, DoubleTap] DataDetectorTypes = [] StyledSettings = [Size, Style, FontColor] TextSettings.Font.Family = 'Courier New' Anchors = [akLeft, akTop, akRight, akBottom] Position.X = 8.000000000000000000 Position.Y = 304.000000000000000000 Size.Width = 624.000000000000000000 Size.Height = 221.000000000000000000 Size.PlatformDefault = False TabOrder = 0 Viewport.Width = 620.000000000000000000 Viewport.Height = 217.000000000000000000 end object PortLabel: TLabel AutoSize = True Position.X = 22.000000000000000000 Position.Y = 18.000000000000000000 Size.Width = 33.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.HorzAlign = Trailing Text = 'Port' TabOrder = 2 end object DataLabel: TLabel AutoSize = True Position.X = 23.000000000000000000 Position.Y = 45.000000000000000000 Size.Width = 33.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.HorzAlign = Trailing Text = 'Data' TabOrder = 3 end object ServerLabel: TLabel Position.X = 172.000000000000000000 Position.Y = 17.000000000000000000 Size.Width = 48.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TextSettings.HorzAlign = Trailing Text = 'Server' TabOrder = 4 end object AddCRLFCheckBox: TCheckBox Position.X = 432.000000000000000000 Position.Y = 18.000000000000000000 Size.Width = 89.000000000000000000 Size.Height = 19.000000000000000000 Size.PlatformDefault = False TabOrder = 5 Text = 'Add CR/LF' end object AllowBinaryCheckBox: TCheckBox Position.X = 432.000000000000000000 Position.Y = 45.000000000000000000 Size.Width = 105.000000000000000000 Size.Height = 19.000000000000000000 Size.PlatformDefault = False TabOrder = 6 Text = 'AllowBinary' end object PortEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 7 Position.X = 64.000000000000000000 Position.Y = 16.000000000000000000 end object DataEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 8 Position.X = 64.000000000000000000 Position.Y = 43.000000000000000000 Size.Width = 260.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False end object ServerEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 9 Position.X = 224.000000000000000000 Position.Y = 16.000000000000000000 end object SendButton: TButton Position.X = 336.000000000000000000 Position.Y = 43.000000000000000000 TabOrder = 10 Text = 'Send' OnClick = SendButtonClick end object DisconnectButton: TButton Enabled = False Position.X = 336.000000000000000000 Position.Y = 16.000000000000000000 TabOrder = 11 Text = 'Disconnect' OnClick = DisconnectButtonClick end object UseProxyCheckBox: TCheckBox Position.X = 16.000000000000000000 Position.Y = 156.000000000000000000 TabOrder = 13 Text = 'Use proxy' OnChange = UseProxyCheckBoxChange end object ProxyPanel: TPanel Position.X = 8.000000000000000000 Position.Y = 176.000000000000000000 Size.Width = 625.000000000000000000 Size.Height = 62.000000000000000000 Size.PlatformDefault = False TabOrder = 14 object SocksServerLabel: TLabel Position.X = 8.000000000000000000 Position.Y = 11.000000000000000000 Size.Width = 73.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TextSettings.HorzAlign = Trailing Text = 'Socks server' TabOrder = 0 end object SocksPortLabel: TLabel Position.X = 208.000000000000000000 Position.Y = 11.000000000000000000 Size.Width = 65.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TextSettings.HorzAlign = Trailing Text = 'Socks port' TabOrder = 1 end object SocksServerEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 2 Position.X = 88.000000000000000000 Position.Y = 8.000000000000000000 end object SocksPortEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 3 Position.X = 281.000000000000000000 Position.Y = 8.000000000000000000 end object SocksLevelLabel: TLabel Position.X = 404.000000000000000000 Position.Y = 11.000000000000000000 Size.Width = 68.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TextSettings.HorzAlign = Trailing Text = 'Socks level' TabOrder = 4 end object SocksLevelComboBox: TComboBox Items.Strings = ( '4' '4A' '5' '5A') ItemIndex = 2 Position.X = 480.000000000000000000 Position.Y = 8.000000000000000000 Size.Width = 35.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False TabOrder = 5 end object SocksUserLabel: TLabel Position.X = 15.000000000000000000 Position.Y = 33.000000000000000000 Size.Width = 65.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TextSettings.HorzAlign = Trailing Text = 'Socks user' TabOrder = 6 end object SocksPassLabel: TLabel Position.X = 216.000000000000000000 Position.Y = 33.000000000000000000 Size.Width = 57.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TextSettings.HorzAlign = Trailing Text = 'Socks pass' TabOrder = 7 end object SocksUserEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 8 Position.X = 88.000000000000000000 Position.Y = 32.000000000000000000 end object SocksPassEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 9 Position.X = 281.000000000000000000 Position.Y = 32.000000000000000000 end end object ClearDisplayButton: TButton Position.X = 336.000000000000000000 Position.Y = 69.000000000000000000 TabOrder = 16 Text = 'Clear display' OnClick = ClearDisplayButtonClick end object TimerStartButton: TButton Position.X = 529.000000000000000000 Position.Y = 16.000000000000000000 Size.Width = 103.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False TabOrder = 18 Text = 'Timer start' OnClick = TimerStartButtonClick end object TimerStopButton: TButton Position.X = 528.000000000000000000 Position.Y = 43.000000000000000000 Size.Width = 104.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False TabOrder = 19 Text = 'Timer stop' OnClick = TimerStopButtonClick end object TimeIntervalTimeButton: TButton Position.X = 528.000000000000000000 Position.Y = 69.000000000000000000 Size.Width = 104.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False TabOrder = 20 Text = 'Timer 1 or 10 Sec' OnClick = TimeIntervalTimeButtonClick end object UseTimeoutCheckBox: TCheckBox Position.X = 16.000000000000000000 Position.Y = 92.000000000000000000 Size.Width = 113.000000000000000000 Size.Height = 19.000000000000000000 Size.PlatformDefault = False TabOrder = 22 Text = 'Use timeout' OnChange = UseTimeoutCheckBoxChange end object TimeoutPanel: TPanel Position.X = 8.000000000000000000 Position.Y = 112.000000000000000000 Size.Width = 624.000000000000000000 Size.Height = 33.000000000000000000 Size.PlatformDefault = False TabOrder = 23 object TimeoutConnectLabel: TLabel Position.X = 10.000000000000000000 Position.Y = 7.000000000000000000 Size.Width = 97.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TextSettings.HorzAlign = Trailing Text = 'Timeout connect' TabOrder = 0 end object TimeoutConnectEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 1 Position.X = 112.000000000000000000 Position.Y = 5.000000000000000000 Hint = 'Timeout in mS before considering connect fails. Zero means syste' + 'm timeout.' Size.Width = 49.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False ParentShowHint = False ShowHint = True end object TimeoutIdleLabel: TLabel Position.X = 192.000000000000000000 Position.Y = 7.000000000000000000 Size.Width = 73.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TextSettings.HorzAlign = Trailing Text = 'Timeout idle' TabOrder = 2 end object TimeoutIdleEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 3 Position.X = 271.000000000000000000 Position.Y = 5.000000000000000000 Hint = 'Timeout in mS for connection to be considered as idle. Zero mean' + 's never considered idle.' Size.Width = 49.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False ParentShowHint = False ShowHint = True end object TimeoutSamplingLabel: TLabel Position.X = 360.000000000000000000 Position.Y = 7.000000000000000000 Size.Width = 112.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TextSettings.HorzAlign = Trailing Text = 'Timeout sampling' TabOrder = 4 end object TimeoutSamplingEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 5 Position.X = 480.000000000000000000 Position.Y = 5.000000000000000000 Hint = 'Interval in mS between timeout sampling.' Size.Width = 49.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False ParentShowHint = False ShowHint = True end end object CliSocket: TIcsWSocket LineLimit = 0 LineEnd = #13#10 TimeoutSampling = 5000 TimeoutConnect = 0 TimeoutIdle = 0 OnTimeout = CliSocketTimeout Proto = 'tcp' LocalAddr = '0.0.0.0' LocalAddr6 = '::' LocalPort = '0' SocksLevel = '5' ExclusiveAddr = False ComponentOptions = [] ListenBacklog = 15 OnDataAvailable = CliSocketDataAvailable OnSessionClosed = CliSocketSessionClosed OnSessionConnected = CliSocketSessionConnected SocketErrs = wsErrTech Left = 144 Top = 344 end end