object PortScanner: TPortScanner
  Left = 156
  Top = 269
  BorderStyle = bsDialog
  Caption = 'PowerProbe (tm) Port Scanner'
  ClientHeight = 337
  ClientWidth = 335
  Font.Color = clWindowText
  Font.Height = -14
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnShow = FormShow
  PixelsPerInch = 120
  TextHeight = 16
  object ProgressCaption: TLabel
    Left = 9
    Top = 244
    Width = 234
    Height = 16
    Caption = 'Press "Scan" to start scanning for ports.'
  end
  object GroupBox1: TGroupBox
    Left = 9
    Top = 5
    Width = 316
    Height = 88
    Caption = '&Scanner settings'
    TabOrder = 0
    object Label4: TLabel
      Left = 14
      Top = 23
      Width = 71
      Height = 16
      AutoSize = False
      Caption = '&IP to scan:'
      FocusControl = ScanIP
    end
    object Label1: TLabel
      Left = 14
      Top = 51
      Width = 71
      Height = 22
      AutoSize = False
      Caption = '&From port:'
      FocusControl = ScanIP
    end
    object Label2: TLabel
      Left = 174
      Top = 51
      Width = 55
      Height = 22
      AutoSize = False
      Caption = '&To port:'
      FocusControl = ScanIP
    end
    object ScanIP: TEdit
      Left = 88
      Top = 20
      Width = 213
      Height = 24
      TabOrder = 0
      OnChange = ScanIPChange
    end
    object FromPort: TEdit
      Left = 88
      Top = 48
      Width = 65
      Height = 24
      TabOrder = 1
      OnChange = ScanIPChange
    end
    object ToPort: TEdit
      Left = 236
      Top = 48
      Width = 65
      Height = 24
      TabOrder = 2
      OnChange = ScanIPChange
    end
  end
  object GroupBox2: TGroupBox
    Left = 9
    Top = 97
    Width = 316
    Height = 140
    Caption = '&Ports found'
    TabOrder = 1
    object PortList: TListBox
      Left = 8
      Top = 16
      Width = 301
      Height = 117
      ItemHeight = 16
      TabOrder = 0
    end
  end
  object ScanProgress: TProgressBar
    Left = 10
    Top = 261
    Width = 315
    Height = 32
    Min = 0
    Max = 100
    TabOrder = 2
  end
  object PortScanner: TSockets
    Left = 8
    Top = 300
    Width = 32
    Height = 32
    MaximumReceiveLength = 8192
    OnSessionConnected = PortScannerSessionConnected
    OnErrorOccurred = PortScannerErrorOccurred
  end
  object Scan: TNashButton
    Left = 134
    Top = 302
    Width = 93
    Height = 30
    Caption = 'S&can'
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = ScanClick
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00000000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333FF33333333333330003FF3FFFFF3333777003000003333
      300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333
      330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000
      333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000
      339977FF777777773377000BFB03333333337773FF733333333F333000333333
      3300333777333333337733333333333333003333333333333377333333333333
      333333333333333333FF33333333333330003333333333333777333333333333
      3000333333333333377733333333333333333333333333333333}
    NumGlyphs = 2
    HoverFont.Color = clBlue
    HoverFont.Height = -13
    HoverFont.Name = 'MS Sans Serif'
    HoverFont.Style = [fsUnderline]
    HoverHighlight = True
  end
  object CloseBtn: TNashButton
    Left = 234
    Top = 302
    Width = 93
    Height = 30
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnClick = CloseBtnClick
    Kind = bkClose
    HoverFont.Color = clRed
    HoverFont.Height = -13
    HoverFont.Name = 'MS Sans Serif'
    HoverFont.Style = [fsUnderline]
    HoverHighlight = True
  end
end