home *** CD-ROM | disk | FTP | other *** search
- 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
-