object PingTstForm: TPingTstForm Left = 256 Top = 96 BorderIcons = [biSystemMenu, biMinimize] BorderStyle = bsSingle Caption = 'Check IP' ClientHeight = 455 ClientWidth = 502 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnClose = FormClose OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Panel6: TPanel Left = 0 Top = 169 Width = 502 Height = 286 Align = alClient BevelOuter = bvNone Ctl3D = True ParentCtl3D = False TabOrder = 2 object GroupBox3: TGroupBox Left = 0 Top = 1 Width = 620 Height = 132 Caption = 'GroupBox3' Ctl3D = True ParentCtl3D = False TabOrder = 0 object Image1: TImage Left = 171 Top = 107 Width = 20 Height = 20 Picture.Data = {} Stretch = True Transparent = True end object Image2: TImage Left = 309 Top = 107 Width = 20 Height = 20 Picture.Data = {} Stretch = True Transparent = True end object Label3: TLabel Left = 198 Top = 111 Width = 62 Height = 13 Caption = 'Computer On' end object Label13: TLabel Left = 339 Top = 111 Width = 65 Height = 13 Caption = 'Computer Off' end object CheckBox1: TCheckBox Left = 14 Top = 109 Width = 143 Height = 17 Caption = 'Show only correct replies' State = cbChecked TabOrder = 1 end object Memo1: TMemo Left = 9 Top = 15 Width = 478 Height = 88 Lines.Strings = ( 'Memo1') TabOrder = 0 end end object Panel8: TPanel Left = 1 Top = 136 Width = 498 Height = 147 Caption = 'Panel8' TabOrder = 1 object ListView1: TListView Left = 8 Top = 9 Width = 479 Height = 126 Columns = <> ReadOnly = True Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] IconOptions.AutoArrange = True IconOptions.WrapText = False ParentFont = False TabOrder = 0 TabStop = False ViewStyle = vsSmallIcon SmallImages = ImageList1 StateImages = ImageList1 end end end object GroupBox1: TGroupBox Left = 0 Top = 5 Width = 502 Height = 164 Align = alTop Caption = ' Test IP Address - Setting ' Ctl3D = True ParentCtl3D = False TabOrder = 0 object Gauge1: TGauge Left = 266 Top = 15 Width = 27 Height = 142 Color = clBtnFace Kind = gkVerticalBar ForeColor = clRed BackColor = clBtnFace MaxValue = 254 ParentColor = False Progress = 0 end object Panel2: TPanel Left = 5 Top = 15 Width = 254 Height = 39 BevelInner = bvLowered TabOrder = 0 object Edit1: TEdit Left = 13 Top = 7 Width = 37 Height = 24 Hint = 'IP address - number between 1 - 254' Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 0 Text = '123' OnChange = Edit1Change OnEnter = Edit1Enter end object UpDown1: TUpDown Left = 50 Top = 7 Width = 15 Height = 24 Associate = Edit1 Min = 1 Max = 254 Position = 123 TabOrder = 1 Wrap = False end object Edit2: TEdit Left = 73 Top = 7 Width = 37 Height = 24 Hint = 'IP address - number between 1 - 254' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 2 Text = '1' OnChange = Edit1Change OnEnter = Edit1Enter end object UpDown2: TUpDown Left = 110 Top = 7 Width = 15 Height = 24 Associate = Edit2 Min = 1 Max = 254 Position = 1 TabOrder = 3 Wrap = False end object Edit3: TEdit Left = 134 Top = 7 Width = 37 Height = 24 Hint = 'IP address - number between 1 - 254' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 4 Text = '1' OnChange = Edit1Change OnEnter = Edit1Enter end object UpDown3: TUpDown Left = 171 Top = 7 Width = 15 Height = 24 Associate = Edit3 Min = 1 Max = 254 Position = 1 TabOrder = 5 Wrap = False end object Edit4: TEdit Left = 194 Top = 7 Width = 37 Height = 24 Hint = 'IP address - number between 1 - 254' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False ParentShowHint = False ShowHint = True TabOrder = 6 Text = '1' OnChange = Edit1Change OnEnter = Edit1Enter end object UpDown4: TUpDown Left = 231 Top = 7 Width = 15 Height = 24 Associate = Edit4 Min = 1 Max = 254 Position = 1 TabOrder = 7 Wrap = False end end object Panel4: TPanel Left = 5 Top = 52 Width = 254 Height = 105 BevelInner = bvLowered TabOrder = 1 object Label1: TLabel Left = 4 Top = 7 Width = 38 Height = 13 Caption = 'Timeout' end object Label2: TLabel Left = 136 Top = 7 Width = 35 Height = 13 Caption = 'Repeat' end object Label4: TLabel Left = 4 Top = 18 Width = 25 Height = 13 Caption = '[ ms ]' end object Label7: TLabel Left = 4 Top = 73 Width = 45 Height = 13 Caption = 'IP Range' end object Label8: TLabel Left = 4 Top = 84 Width = 45 Height = 13 Caption = '[low byte]' end object Label5: TLabel Left = 136 Top = 40 Width = 35 Height = 13 Caption = 'Repeat' end object Label6: TLabel Left = 136 Top = 51 Width = 31 Height = 13 Caption = '[ min. ]' end object Label10: TLabel Left = 136 Top = 19 Width = 36 Height = 13 Caption = 'on error' end object Label11: TLabel Left = 4 Top = 40 Width = 49 Height = 13 Caption = 'Send data' end object Label12: TLabel Left = 4 Top = 51 Width = 31 Height = 13 Caption = '[bytes]' end object Label9: TLabel Left = 136 Top = 76 Width = 9 Height = 13 Caption = 'to' end object Edit5: TEdit Left = 59 Top = 9 Width = 50 Height = 21 TabOrder = 0 Text = '5' OnChange = Edit1Change OnEnter = Edit1Enter end object UpDown5: TUpDown Left = 109 Top = 9 Width = 15 Height = 21 Associate = Edit5 Min = 5 Max = 5000 Increment = 10 Position = 5 TabOrder = 1 Thousands = False Wrap = False end object Edit6: TEdit Left = 180 Top = 9 Width = 50 Height = 21 TabOrder = 2 Text = '1' OnChange = Edit1Change OnEnter = Edit1Enter end object UpDown6: TUpDown Left = 230 Top = 9 Width = 15 Height = 21 Associate = Edit6 Min = 1 Position = 1 TabOrder = 3 Wrap = False end object Edit8: TEdit Left = 59 Top = 74 Width = 50 Height = 21 TabOrder = 8 Text = '1' OnChange = Edit1Change OnEnter = Edit1Enter end object Edit9: TEdit Left = 180 Top = 75 Width = 50 Height = 21 TabOrder = 10 Text = '254' OnChange = Edit1Change OnEnter = Edit1Enter end object UpDown8: TUpDown Left = 109 Top = 74 Width = 15 Height = 21 Associate = Edit8 Min = 1 Max = 254 Position = 1 TabOrder = 9 Wrap = False end object UpDown9: TUpDown Left = 230 Top = 75 Width = 15 Height = 21 Associate = Edit9 Min = 1 Max = 254 Position = 254 TabOrder = 11 Wrap = False end object Edit7: TEdit Left = 180 Top = 42 Width = 50 Height = 21 TabOrder = 6 Text = '5' OnChange = Edit1Change OnEnter = Edit1Enter end object UpDown7: TUpDown Left = 230 Top = 42 Width = 15 Height = 21 Associate = Edit7 Min = 0 Max = 60 Position = 5 TabOrder = 7 Wrap = False end object Edit10: TEdit Left = 59 Top = 42 Width = 50 Height = 21 TabOrder = 4 Text = '64' OnChange = Edit1Change OnEnter = Edit1Enter end object UpDown10: TUpDown Left = 109 Top = 42 Width = 15 Height = 21 Associate = Edit10 Min = 10 Max = 4096 Increment = 10 Position = 64 TabOrder = 5 Thousands = False Wrap = False end end object Button2: TButton Left = 301 Top = 89 Width = 90 Height = 30 Caption = '&Get local IP' TabOrder = 6 OnClick = Button2Click end object PingButton: TButton Left = 303 Top = 126 Width = 88 Height = 30 Caption = '&Ping' TabOrder = 8 OnClick = PingButtonClick end object Button10: TButton Left = 301 Top = 15 Width = 90 Height = 30 Caption = '&Exit' TabOrder = 2 OnClick = Button10Click end object Button3: TButton Left = 301 Top = 52 Width = 90 Height = 30 Caption = '&About' TabOrder = 4 OnClick = Button3Click end object Button4: TButton Left = 398 Top = 15 Width = 90 Height = 30 Caption = 'Clear List' TabOrder = 3 OnClick = Button4Click end object Button5: TButton Left = 398 Top = 52 Width = 90 Height = 30 Caption = 'Save List' TabOrder = 5 OnClick = Button5Click end object Button1: TButton Left = 398 Top = 89 Width = 90 Height = 30 Caption = 'Check &IP' TabOrder = 7 OnClick = Button1Click end object Button7: TButton Left = 398 Top = 126 Width = 90 Height = 30 Caption = 'Clear List' TabOrder = 9 OnClick = Button7Click end end object Panel1: TPanel Left = 0 Top = 0 Width = 502 Height = 5 Align = alTop BevelOuter = bvNone TabOrder = 1 end object Ping1: TPing Address = 'abc' Size = 64 Timeout = 1 TTL = 64 OnEchoRequest = Ping1EchoRequest OnEchoReply = Ping1EchoReply Left = 32 Top = 215 end object ImageList1: TImageList Left = 80 Top = 215 Bitmap = { 494C010102000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600 000000000000360000002800000040000000100000000100180000000000000C 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000C6C6C6C6C6C6C6C6C6C6C6 C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C600000084848400000000 0000000000C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6 C6C6C6C6C6C60000008484840000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000C6C6C60000000000000000 00C6C6C6C6C6C60000FF8400FFC6C6C600FF0000FF0000000084848484848400 0000000000C6C6C6000000000000000000C6C6C6C6C6C6848484848484C6C6C6 8484848484840000008484848484840000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000C6C6C6C6C6C6C6C6C6C6C6 C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C600000084848484848484 8484000000C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6 C6C6C6C6C6C60000008484848484848484840000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000084848484848484 8484000000000000000000000000000000000000000000000000000000000000 0000000000000000008484848484848484840000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000008484840000008484 84C6C6C6C6C6C6C6C6C684848400000000000084848484848484848484848484 8484000000000000848484000000848484C6C6C6C6C6C6C6C6C6848484000000 0000008484848484848484848484848484840000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000FF0000FF0000000084848484848400000000 00000000000000000000000000000000000000000000000000000000004284FF 4284FF0000008484848484840000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000C6C6C6C6C6C6C6C6C6C6C6 C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C600000084848400000000 0000000000C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6 C6C6C6C6C6C60000008484840000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000C6C6C6FF0042FF0042FF00 42FF0042FF0042FF0042FF0042FF0042FF0042C6C6C600000084848484848400 0000000000C6C6C6424200424200424200424200424200424200424200424200 424200C6C6C60000008484848484840000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000C6C6C6FF0042FF8400FF84 00FF8400FF8400FF8400FF8400FF8400FF0042C6C6C600000084848484848484 8484000000C6C6C6424200848484848484848484848484848484848484848484 424200C6C6C60000008484848484848484840000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000C6C6C6FF0042FFFF84FF84 00FF8400FF8400FF8400FF8400FF8400FF0042C6C6C600000084848484848484 8484000000C6C6C6424200C6C6C6848484848484848484848484848484848484 424200C6C6C60000008484848484848484840000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000C6C6C6FF0042FFFF84FF84 00FF8400FF8400FF8400FF8400FF8400FF0042C6C6C600000084848484848484 8484000000C6C6C6424200C6C6C6C6C6C6848484848484848484848484848484 424200C6C6C60000008484848484848484840000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000C6C6C6FF0042FFFF84FFFF 0084FF00FF8400FF8484FF8400FF8400FF0042C6C6C600000084848484848484 8484000000C6C6C6424200C6C6C6C6C6C6C6C6C6848484848484848484848484 424200C6C6C60000008484848484848484840000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000C6C6C6FF0042FF0042FF00 42FF0042FF0042FF0042FF0042FF0042FF0042C6C6C600000084848484848400 0000000000C6C6C6424200424200424200424200424200424200424200424200 424200C6C6C60000008484848484840000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000000000C6C6C6C6C6C6C6C6C6C6C6 C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C600000084848400000000 0000000000C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6 C6C6C6C6C6C60000008484840000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000084848400000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000008484840000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000424D3E000000000000003E000000 2800000040000000100000000100010000000000800000000000000000000000 000000000000000000000000FFFFFF00800F800F000000000003000300000000 000100010000000000000000000000000008000800000000C000C00000000000 8003800300000000000300030000000000010001000000000000000000000000 0000000000000000000000000000000000000000000000000001000100000000 0003000300000000800780070000000000000000000000000000000000000000 000000000000} end object Timer1: TTimer Interval = 50 OnTimer = Timer1Timer Left = 220 Top = 212 end object SaveDialog1: TSaveDialog DefaultExt = '*.txt' FileName = 'CheckIPStatus' Filter = 'Text file|*.txt' Options = [ofHideReadOnly, ofNoNetworkButton] Title = 'Save showed CheckIP Status' Left = 154 Top = 215 end end