object Form1: TForm1 Left = 0 Top = 0 Caption = 'Gasmeter Log-Downloader' ClientHeight = 521 ClientWidth = 513 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] OldCreateOrder = False OnCreate = FormCreate OnDestroy = FormDestroy PixelsPerInch = 96 TextHeight = 13 object lblImpressum: TLabel Left = 376 Top = 468 Width = 68 Height = 13 Caption = 'reserve, 2022' end object lbledtURL: TLabeledEdit Left = 28 Top = 36 Width = 273 Height = 21 EditLabel.Width = 146 EditLabel.Height = 13 EditLabel.Caption = 'URL to Logfile-Path on Device:' TabOrder = 0 Text = 'http://192.168.10.65/fileserver/log/message/' end object btnDownloadLogfiles: TButton Left = 28 Top = 174 Width = 273 Height = 25 Caption = 'Download Logfiles and generate CSV' TabOrder = 1 OnClick = btnDownloadLogfilesClick end object lbledtMaxLogfilesOnServer: TLabeledEdit Left = 323 Top = 36 Width = 121 Height = 21 EditLabel.Width = 173 EditLabel.Height = 13 EditLabel.Caption = 'Download logfiles from past # days:' TabOrder = 2 Text = '30' end object lbledtTargetDirectory: TLabeledEdit Left = 28 Top = 84 Width = 273 Height = 21 EditLabel.Width = 103 EditLabel.Height = 13 EditLabel.Caption = 'Download Logfiles to:' TabOrder = 3 Text = 'C:\Temp\Gas\' end object lbledtCsvFile: TLabeledEdit Left = 28 Top = 131 Width = 273 Height = 21 EditLabel.Width = 80 EditLabel.Height = 13 EditLabel.Caption = 'Output CSV-File:' TabOrder = 4 Text = 'C:\Temp\Gas\Values.csv' end object redtLog: TRichEdit Left = 28 Top = 220 Width = 273 Height = 277 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] Lines.Strings = ( 'redtLog') ParentFont = False TabOrder = 5 Zoom = 100 end object idhtp1: TIdHTTP AllowCookies = True ProxyParams.BasicAuthentication = False ProxyParams.ProxyPort = 0 Request.ContentLength = -1 Request.ContentRangeEnd = -1 Request.ContentRangeStart = -1 Request.ContentRangeInstanceLength = -1 Request.Accept = 'text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8' Request.BasicAuthentication = False Request.UserAgent = 'Mozilla/3.0 (compatible; Indy Library)' Request.Ranges.Units = 'bytes' Request.Ranges = <> HTTPOptions = [hoForceEncodeParams] Left = 572 Top = 464 end end