object ServerForm: TServerForm Left = 0 Top = 0 Caption = 'ServerForm' ClientHeight = 349 ClientWidth = 508 Visible = True FormFactor.Width = 320 FormFactor.Height = 480 FormFactor.Devices = [Desktop] DesignerMasterStyle = 0 object Memo: TMemo Touch.InteractiveGestures = [Pan, LongTap, DoubleTap] DataDetectorTypes = [] Anchors = [akLeft, akTop, akRight, akBottom] Position.X = 8.000000000000000000 Position.Y = 8.000000000000000000 Size.Width = 489.000000000000000000 Size.Height = 273.000000000000000000 Size.PlatformDefault = False TabOrder = 0 Viewport.Width = 485.000000000000000000 Viewport.Height = 269.000000000000000000 end object PortLabel: TLabel Anchors = [akLeft, akBottom] Position.X = 8.000000000000000000 Position.Y = 293.000000000000000000 Size.Width = 33.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False Text = 'Port' TabOrder = 1 end object PortEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] Anchors = [akLeft, akBottom] TabOrder = 2 Text = '5000' Position.X = 49.000000000000000000 Position.Y = 289.000000000000000000 Size.Width = 64.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False end object ChangePortButton: TButton Anchors = [akLeft, akBottom] Position.X = 120.000000000000000000 Position.Y = 288.000000000000000000 Size.Width = 64.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False TabOrder = 3 Text = 'Change' OnClick = ChangePortButtonClick end object IPv4RadioButton: TRadioButton Anchors = [akLeft, akBottom] IsChecked = True Position.X = 204.000000000000000000 Position.Y = 284.000000000000000000 Size.Width = 57.000000000000000000 Size.Height = 19.000000000000000000 Size.PlatformDefault = False TabOrder = 4 Text = 'IPv4' OnChange = IPv4RadioButtonChange object EchoCheckBox: TCheckBox Anchors = [akLeft, akBottom] Position.X = 56.000000000000000000 Position.Y = 8.000000000000000000 Size.Width = 65.000000000000000000 Size.Height = 19.000000000000000000 Size.PlatformDefault = False TabOrder = 20 Text = 'Echo' OnChange = EchoCheckBoxChange object CloseSocketButton: TButton Position.X = -140.000000000000000000 Position.Y = 25.000000000000000000 Size.Width = 64.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False TabOrder = 19 Text = 'Close' OnClick = CloseSocketButtonClick end end end object IPv6RadioButton: TRadioButton Anchors = [akLeft, akBottom] Position.X = 204.000000000000000000 Position.Y = 304.000000000000000000 Size.Width = 73.000000000000000000 Size.Height = 19.000000000000000000 Size.PlatformDefault = False TabOrder = 5 Text = 'IPv6' OnChange = IPv6RadioButtonChange end object AboutButton: TButton Anchors = [akLeft, akBottom] Position.X = 352.000000000000000000 Position.Y = 288.000000000000000000 Size.Width = 57.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False TabOrder = 6 Text = 'About' end object QuitButton: TButton Anchors = [akLeft, akBottom] Position.X = 424.000000000000000000 Position.Y = 288.000000000000000000 Size.Width = 65.000000000000000000 Size.Height = 22.000000000000000000 Size.PlatformDefault = False TabOrder = 7 Text = 'Quit' OnClick = QuitButtonClick object ClearDisplayButton: TButton Position.X = -15.000000000000000000 Position.Y = 30.000000000000000000 TabOrder = 5 Text = 'Clear Display' OnClick = ClearDisplayButtonClick end end object SrvSocket: TIcsWSocket Left = 72 Top = 80 end end