object frmMain: TfrmMain
  Left = 192
  Top = 139
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'Tracert Demo'
  ClientHeight = 438
  ClientWidth = 665
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object lblHost: TLabel
    Left = 8
    Top = 384
    Width = 25
    Height = 13
    Caption = 'Host:'
  end
  object lblHop: TLabel
    Left = 504
    Top = 384
    Width = 28
    Height = 13
    Caption = 'Hops:'
  end
  object gbTracert: TGroupBox
    Left = 8
    Top = 0
    Width = 649
    Height = 377
    Caption = 'Tracert log'
    TabOrder = 3
    object memShowTracert: TMemo
      Left = 2
      Top = 15
      Width = 645
      Height = 360
      Align = alClient
      Font.Charset = RUSSIAN_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Courier'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      ScrollBars = ssBoth
      TabOrder = 0
    end
  end
  object edAddr: TEdit
    Left = 8
    Top = 400
    Width = 489
    Height = 24
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    Text = 'www.delphimaster.ru'
  end
  object btnStart: TButton
    Left = 584
    Top = 400
    Width = 75
    Height = 25
    Caption = 'Start'
    Default = True
    TabOrder = 0
    OnClick = btnStartClick
  end
  object sedCount: TSpinEdit
    Left = 504
    Top = 400
    Width = 73
    Height = 26
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MaxValue = 255
    MinValue = 1
    ParentFont = False
    TabOrder = 2
    Value = 30
  end
end
