object frmAlert: TfrmAlert
  Left = 381
  Top = 159
  BorderStyle = bsDialog
  Caption = 'Message Alert'
  ClientHeight = 363
  ClientWidth = 269
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  FormStyle = fsStayOnTop
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 13
  object lblMsg: TLabel
    Left = 8
    Top = 106
    Width = 257
    Height = 65
    AutoSize = False
    Caption = 'Message Alert'
    WordWrap = True
  end
  object lblDate: TLabel
    Left = 8
    Top = 66
    Width = 33
    Height = 13
    Caption = 'lblDate'
  end
  object lblHeader: TLabel
    Left = 8
    Top = 50
    Width = 54
    Height = 13
    Caption = 'lblHeader'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object lblActionsTaken: TLabel
    Left = 16
    Top = 194
    Width = 249
    Height = 81
    AutoSize = False
    Caption = 'lblActionsTaken'#13#10'2'#13#10'3'#13#10'4'#13#10'5'#13#10'6'#13#10'7'
  end
  object Label2: TLabel
    Left = 8
    Top = 178
    Width = 83
    Height = 13
    Caption = 'Actions Taken:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold, fsUnderline]
    ParentFont = False
  end
  object Label3: TLabel
    Left = 8
    Top = 90
    Width = 53
    Height = 13
    Caption = 'Message:'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Tahoma'
    Font.Style = [fsBold, fsUnderline]
    ParentFont = False
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 269
    Height = 48
    Align = alTop
    BevelOuter = bvLowered
    Color = clNavy
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWhite
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 5
    object Label1: TLabel
      Left = 64
      Top = 11
      Width = 138
      Height = 24
      Caption = 'X-NetStat Alert'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -19
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Image1: TImage
      Left = 8
      Top = 7
      Width = 32
      Height = 32
      AutoSize = True
      Picture.Data = {<image000.ico>}
    end
  end
  object btnOK: TButton
    Left = 8
    Top = 330
    Width = 75
    Height = 25
    Caption = '&OK'
    TabOrder = 2
    OnClick = btnOKClick
  end
  object chkIgnore: TCheckBox
    Left = 48
    Top = 286
    Width = 185
    Height = 17
    Caption = '&Ignore rule this session'
    TabOrder = 0
  end
  object chkDisable: TCheckBox
    Left = 48
    Top = 306
    Width = 185
    Height = 17
    Caption = '&Disable this rule completely'
    TabOrder = 1
  end
  object btnActions: TButton
    Left = 184
    Top = 330
    Width = 75
    Height = 25
    Caption = '&Actions'
    PopupMenu = popActions
    TabOrder = 4
    OnClick = btnActionsClick
  end
  object btnEditRule: TButton
    Left = 96
    Top = 330
    Width = 75
    Height = 25
    Caption = '&Edit Rule'
    TabOrder = 3
    OnClick = btnEditRuleClick
  end
  object LeftRight1: TUpDown
    Left = 224
    Top = 24
    Width = 33
    Height = 17
    Min = 0
    Orientation = udHorizontal
    Position = 1
    TabOrder = 6
    Wrap = True
    OnChangingEx = LeftRight1ChangingEx
    OnClick = LeftRight1Click
  end
  object popActions: TPopupMenu
    OnPopup = popActionsPopup
    Left = 232
    Top = 282
    object raceroute1: TMenuItem
      Caption = 'Traceroute'
      OnClick = raceroute1Click
    end
    object ARINWHOISlookup1: TMenuItem
      Caption = 'WHOIS lookup'
      OnClick = ARINWHOISlookup1Click
    end
    object nbl1: TMenuItem
      Caption = 'NBlookup'
      OnClick = nbl1Click
    end
    object KillConnection1: TMenuItem
      Caption = 'Kill connection'
      OnClick = KillConnection1Click
    end
  end
end