object WebServForm: TWebServForm Left = 253 Top = 158 Caption = 'ICS WebServer Demo - http://www.overbyte.be' ClientHeight = 335 ClientWidth = 503 FormFactor.Width = 320 FormFactor.Height = 480 FormFactor.Devices = [Desktop, iPhone, iPad] OnCreate = FormCreate OnClose = FormClose OnDestroy = FormDestroy Left = 253 Top = 158 DesignerMasterStyle = 0 object ToolsPanel: TPanel Align = Top Size.Width = 503.000000000000000000 Size.Height = 158.000000000000000000 Size.PlatformDefault = False TabOrder = 0 object Label1: TLabel AutoSize = True Position.X = 40.000000000000000000 Position.Y = 8.000000000000000000 Size.Width = 37.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.WordWrap = False Text = 'DocDir' TabOrder = 0 Left = 40 Top = 8 end object Label2: TLabel AutoSize = True Position.X = 19.000000000000000000 Position.Y = 32.000000000000000000 Size.Width = 60.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.WordWrap = False Text = 'DefaultDoc' TabOrder = 1 Left = 19 Top = 32 end object Label3: TLabel AutoSize = True Position.X = 256.000000000000000000 Position.Y = 5.000000000000000000 Size.Width = 22.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.WordWrap = False Text = 'Port' TabOrder = 2 Left = 259 Top = 7 end object ClientCountLabel: TLabel AutoSize = True Position.X = 297.000000000000000000 Position.Y = 34.000000000000000000 Size.Width = 91.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.WordWrap = False Text = 'ClientCountLabel' TabOrder = 3 Left = 294 Top = 34 end object Label5: TLabel AutoSize = True Position.X = 255.000000000000000000 Position.Y = 34.000000000000000000 Size.Width = 39.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.WordWrap = False Text = 'Clients:' TabOrder = 4 Left = 258 Top = 34 end object Label4: TLabel AutoSize = True Position.X = 25.000000000000000000 Position.Y = 81.000000000000000000 Size.Width = 52.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.WordWrap = False Text = 'Redir URL' TabOrder = 5 Left = 23 Top = 81 end object Label6: TLabel AutoSize = True Position.X = 12.000000000000000000 Position.Y = 57.000000000000000000 Size.Width = 64.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.WordWrap = False Text = 'TemplateDir' TabOrder = 6 Left = 16 Top = 57 end object Label7: TLabel AutoSize = True Position.X = 355.000000000000000000 Position.Y = 81.000000000000000000 Size.Width = 96.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.WordWrap = False Text = 'KeepAliveTimeSec' TabOrder = 7 Left = 357 Top = 77 end object Label8: TLabel AutoSize = True Position.X = 330.000000000000000000 Position.Y = 106.000000000000000000 Size.Width = 122.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.WordWrap = False Text = 'MaxRequestsKeepAlive' TabOrder = 8 Left = 334 Top = 101 end object Label9: TLabel AutoSize = True Position.X = 9.000000000000000000 Position.Y = 106.000000000000000000 Size.Width = 173.000000000000000000 Size.Height = 16.000000000000000000 Size.PlatformDefault = False TextSettings.WordWrap = False Text = 'Maximum Bandwidth (bytes/sec)' TabOrder = 9 Left = 9 Top = 101 end object DocDirEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 10 Text = 'DocDirEdit' Position.X = 80.000000000000000000 Position.Y = 4.000000000000000000 Size.Width = 165.000000000000000000 Size.Height = 21.000000000000000000 Size.PlatformDefault = False Left = 80 Top = 4 end object DefaultDocEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 11 Text = 'DefaultDocEdit' Position.X = 80.000000000000000000 Position.Y = 29.000000000000000000 Size.Width = 165.000000000000000000 Size.Height = 21.000000000000000000 Size.PlatformDefault = False Left = 80 Top = 29 end object StartButton: TButton Position.X = 251.000000000000000000 Position.Y = 54.000000000000000000 Size.Width = 53.000000000000000000 Size.Height = 21.000000000000000000 Size.PlatformDefault = False TabOrder = 12 Text = 'Start' OnClick = StartButtonClick Left = 251 Top = 52 end object StopButton: TButton Position.X = 251.000000000000000000 Position.Y = 79.000000000000000000 Size.Width = 53.000000000000000000 Size.Height = 21.000000000000000000 Size.PlatformDefault = False TabOrder = 13 Text = 'Stop' OnClick = StopButtonClick Left = 251 Top = 79 end object PortEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 14 Text = 'PortEdit' Position.X = 283.000000000000000000 Position.Y = 3.000000000000000000 Size.Width = 53.000000000000000000 Size.Height = 21.000000000000000000 Size.PlatformDefault = False Left = 283 Top = 3 end object ClearButton: TButton Position.X = 311.000000000000000000 Position.Y = 54.000000000000000000 Size.Width = 53.000000000000000000 Size.Height = 21.000000000000000000 Size.PlatformDefault = False TabOrder = 15 Text = 'Clear' OnClick = ClearButtonClick Left = 311 Top = 52 end object DisplayHeaderCheckBox: TCheckBox Position.X = 389.000000000000000000 Position.Y = 57.000000000000000000 Size.Width = 104.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TabOrder = 16 Text = 'Display Header' Left = 389 Top = 57 end object WriteLogFileCheckBox: TCheckBox Position.X = 389.000000000000000000 Position.Y = 40.000000000000000000 Size.Width = 108.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TabOrder = 17 Text = 'Write to log file' OnClick = WriteLogFileCheckBoxClick Left = 389 Top = 40 end object DirListCheckBox: TCheckBox Position.X = 401.000000000000000000 Position.Y = 23.000000000000000000 Size.Width = 92.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TabOrder = 18 Text = 'Allow Dir List' Left = 401 Top = 23 end object OutsideRootCheckBox: TCheckBox Position.X = 373.000000000000000000 Position.Y = 6.000000000000000000 Size.Width = 124.000000000000000000 Size.Height = 17.000000000000000000 Size.PlatformDefault = False TabOrder = 19 Text = 'Allow Outside Root' Left = 373 Top = 6 end object RedirURLEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 20 Text = 'RedirURLEdit' Position.X = 80.000000000000000000 Position.Y = 79.000000000000000000 Size.Width = 165.000000000000000000 Size.Height = 21.000000000000000000 Size.PlatformDefault = False Left = 80 Top = 79 end object TemplateDirEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 21 Text = 'TemplateDirEdit' Position.X = 80.000000000000000000 Position.Y = 54.000000000000000000 Size.Width = 165.000000000000000000 Size.Height = 21.000000000000000000 Size.PlatformDefault = False Left = 80 Top = 54 end object KeepAliveTimeSecEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 22 Text = 'KeepAliveTimeSecEdit' Position.X = 453.000000000000000000 Position.Y = 79.000000000000000000 Size.Width = 33.000000000000000000 Size.Height = 21.000000000000000000 Size.PlatformDefault = False Left = 453 Top = 74 end object MaxRequestsKeepAliveEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 23 Text = 'MaxRequestsKeepAliveEdit' Position.X = 453.000000000000000000 Position.Y = 104.000000000000000000 Size.Width = 33.000000000000000000 Size.Height = 21.000000000000000000 Size.PlatformDefault = False Left = 453 Top = 98 end object BandwidthLimitEdit: TEdit Touch.InteractiveGestures = [LongTap, DoubleTap] TabOrder = 24 Text = 'BandwidthLimitEdit' Position.X = 178.000000000000000000 Position.Y = 104.000000000000000000 Size.Width = 67.000000000000000000 Size.Height = 21.000000000000000000 Size.PlatformDefault = False Left = 168 Top = 97 end object DisableDisplayCheckBox: TCheckBox Position.X = 249.000000000000000000 Position.Y = 105.000000000000000000 Size.Width = 88.000000000000000000 Size.Height = 19.000000000000000000 Size.PlatformDefault = False TabOrder = 25 Text = 'No Display' end end object DisplayMemo: TMemo Touch.InteractiveGestures = [Pan, LongTap, DoubleTap] DataDetectorTypes = [] Lines.Strings = ( 'DisplayMemo') Align = Client Size.Width = 503.000000000000000000 Size.Height = 177.000000000000000000 Size.PlatformDefault = False TabOrder = 1 Viewport.Width = 499.000000000000000000 Viewport.Height = 173.000000000000000000 end object HttpServer1: THttpServer ListenBacklog = 5 MultiListenSockets = <> Port = 'http' Addr = '0.0.0.0' SocketFamily = sfIPv4 MaxClients = 0 DocDir = '\WebShare' TemplateDir = 'c:\wwwroot\templates' DefaultDoc = 'index.html' LingerOnOff = wsLingerNoSet LingerTimeout = 1 Options = [] KeepAliveTimeSec = 10 KeepAliveTimeXferSec = 300 MaxRequestsKeepAlive = 100 SizeCompressMin = 5000 SizeCompressMax = 5000000 MaxBlkSize = 8192 MimeTypesList = MimeTypesList1 BandwidthLimit = 0 BandwidthSampling = 1000 ServerHeader = 'Server: ICS-HttpServer-8.67' OnServerStarted = HttpServer1ServerStarted OnServerStopped = HttpServer1ServerStopped OnClientConnect = HttpServer1ClientConnect OnClientDisconnect = HttpServer1ClientDisconnect OnGetDocument = HttpServer1GetDocument OnHeadDocument = HttpServer1HeadDocument OnPostDocument = HttpServer1PostDocument OnPostedData = HttpServer1PostedData OnAuthGetPassword = HttpServer1AuthGetPassword OnAuthResult = HttpServer1AuthResult OnAuthGetType = HttpServer1AuthGetType AuthTypes = [] AuthRealm = 'ics' SocketErrs = wsErrTech ExclusiveAddr = True Left = 30 Top = 175 end object MimeTypesList1: TMimeTypesList LoadOSonDemand = True MimeTypesFile = '/etc/apache2/mime.types' DefaultTypes.Strings = ( '.htm=text/html' '.html=text/html' '.gif=image/gif' '.bmp=image/bmp' '.jpg=image/jpeg' '.jpeg=image/jpeg' '.tif=image/tiff' '.tiff=image/tiff' '.txt=text/plain' '.css=text/css' '.wav=audio/x-wav' '.ico=image/x-icon' '.wml=text/vnd.wap.wml' '.wbmp=image/vnd.wap.wbmp' '.wmlc=application/vnd.wap.wmlc' '.wmlscript=text/vnd.wap.wmlscript' '.wmlscriptc=application/vnd.wap.wmlscriptc' '.pdf=application/pdf' '.png=image/png' '.xml=application/xml' '.xhtml=application/xhtml+xml' '.zip=application/zip' '.exe=application/x-msdownload' '.msi=application/x-msdownload' '.bin=application/octet-stream' '.iso=application/octet-stream') MimeTypeSrc = MTypeList UnknownType = 'application/octet-stream' Left = 111 Top = 177 end end