Chip 2005 June/ccd0605.iso/Software/Shareware/Comunicatii/xns/xns53p_setup.exe/xns5.exe/0/RCDATA/TFRMEDITRULE/TFRMEDITRULE.txt

Text File | 2005-05-02 | 11KB | 434 lines

object frmEditRule: TfrmEditRule
  Left = 316
  Top = 137
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsDialog
  Caption = 'Edit Rule'
  ClientHeight = 433
  ClientWidth = 405
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnKeyPress = FormKeyPress
  PixelsPerInch = 96
  TextHeight = 13
  object PageControl1: TPageControl
    Left = 0
    Top = 32
    Width = 401
    Height = 385
    ActivePage = Conditions
    Style = tsFlatButtons
    TabIndex = 0
    TabOrder = 0
    object Conditions: TTabSheet
      Caption = 'Conditions'
      object gb1: TGroupBox
        Left = 0
        Top = 0
        Width = 393
        Height = 337
        Caption = 'Trigger conditions'
        TabOrder = 0
        object Bevel1: TBevel
          Left = 1
          Top = 120
          Width = 390
          Height = 9
          Shape = bsTopLine
        end
        object Label1: TLabel
          Left = 16
          Top = 24
          Width = 291
          Height = 13
          Caption = 'Please choose conditions under which to trigger rule Actions.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = [fsUnderline]
          ParentFont = False
        end
        object Label2: TLabel
          Left = 288
          Top = 304
          Width = 39
          Height = 13
          Caption = 'seconds'
        end
        object JonLine2: TJonLine
          Left = 39
          Top = 80
          Width = 33
          Height = 20
          Hint = '40'
          PenColor = clGray
          DrawLines = [lpLeft, lpBottom]
        end
        object Bevel2: TBevel
          Left = 1
          Top = 164
          Width = 390
          Height = 4
          Shape = bsTopLine
        end
        object Bevel3: TBevel
          Left = 1
          Top = 287
          Width = 390
          Height = 9
          Shape = bsTopLine
        end
        object Bevel5: TBevel
          Left = 1
          Top = 240
          Width = 390
          Height = 9
          Shape = bsTopLine
        end
        object rbAnyAddress: TRadioButton
          Left = 32
          Top = 48
          Width = 185
          Height = 17
          Caption = '&Any remote address'
          Checked = True
          TabOrder = 0
          TabStop = True
          OnClick = rbAnyAddressClick
        end
        object rbAddrMustContain: TRadioButton
          Left = 32
          Top = 72
          Width = 185
          Height = 17
          BiDiMode = bdLeftToRight
          Caption = 'IP or Hostname must contai&n'
          ParentBiDiMode = False
          TabOrder = 1
          OnClick = rbAnyAddressClick
        end
        object edtAddress: TEdit
          Left = 56
          Top = 88
          Width = 193
          Height = 21
          TabOrder = 2
          OnClick = edtAddressClick
        end
        object chkMinConns: TCheckBox
          Left = 32
          Top = 135
          Width = 168
          Height = 17
          Caption = 'Minimum &connections required'
          TabOrder = 3
          OnClick = chkMinConnsClick
        end
        object chkLport: TCheckBox
          Left = 32
          Top = 177
          Width = 137
          Height = 20
          Caption = '&Local Port must be'
          TabOrder = 5
          OnClick = chkLportClick
        end
        object chkRport: TCheckBox
          Left = 32
          Top = 205
          Width = 129
          Height = 17
          Caption = '&Remote Port must be'
          TabOrder = 7
          OnClick = chkRportClick
        end
        object edtLport: TEdit
          Left = 160
          Top = 176
          Width = 73
          Height = 21
          Enabled = False
          TabOrder = 6
          OnKeyPress = edtLportKeyPress
        end
        object edtRport: TEdit
          Left = 160
          Top = 202
          Width = 73
          Height = 21
          Enabled = False
          TabOrder = 8
          OnKeyPress = edtLportKeyPress
        end
        object chkTimeReq: TCheckBox
          Left = 32
          Top = 304
          Width = 177
          Height = 17
          Caption = 'Connection &present for at least'
          TabOrder = 11
          OnClick = chkTimeReqClick
        end
        object spinTime: TRxSpinEdit
          Left = 211
          Top = 301
          Width = 70
          Height = 21
          MaxValue = 99999
          MinValue = 1
          Value = 120
          Enabled = False
          TabOrder = 12
        end
        object spinConns: TRxSpinEdit
          Left = 200
          Top = 132
          Width = 49
          Height = 21
          MaxValue = 999
          MinValue = 1
          Value = 1
          Enabled = False
          TabOrder = 4
        end
        object chkProcess: TCheckBox
          Left = 32
          Top = 256
          Width = 145
          Height = 17
          Caption = 'Process E&XE contains'
          TabOrder = 9
          OnClick = chkProcessClick
        end
        object edtProcess: TEdit
          Left = 160
          Top = 256
          Width = 121
          Height = 21
          TabOrder = 10
        end
      end
    end
    object Actions: TTabSheet
      Caption = 'Actions'
      ImageIndex = 1
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 393
        Height = 334
        Caption = 'Actions to perform when conditions met'
        TabOrder = 0
        object Bevel4: TBevel
          Left = 1
          Top = 203
          Width = 390
          Height = 10
          Shape = bsTopLine
        end
        object Label3: TLabel
          Left = 16
          Top = 24
          Width = 265
          Height = 13
          Caption = 'Please choose Actions to perform when conditions met.'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'Tahoma'
          Font.Style = [fsUnderline]
          ParentFont = False
        end
        object JonLine1: TJonLine
          Left = 22
          Top = 225
          Width = 25
          Height = 24
          PenColor = clGray
          DrawLines = [lpLeft, lpBottom]
        end
        object JonLine3: TJonLine
          Left = 22
          Top = 280
          Width = 33
          Height = 25
          PenColor = clGray
          DrawLines = [lpLeft, lpBottom]
        end
        object chkRunProg: TCheckBox
          Left = 32
          Top = 48
          Width = 113
          Height = 17
          Caption = 'Run &Program'
          TabOrder = 0
          OnClick = chkRunProgClick
        end
        object chkOpenURL: TCheckBox
          Left = 32
          Top = 114
          Width = 97
          Height = 17
          Caption = 'Open &URL'
          TabOrder = 4
          OnClick = chkOpenURLClick
        end
        object chkPlayWav: TCheckBox
          Left = 32
          Top = 81
          Width = 97
          Height = 17
          Caption = 'Play &WAV File'
          TabOrder = 2
          OnClick = chkPlayWavClick
        end
        object chkKillConn: TCheckBox
          Left = 32
          Top = 147
          Width = 201
          Height = 17
          Caption = 'Attempt to &Kill the connection'
          TabOrder = 6
        end
        object chkStartTrace: TCheckBox
          Left = 32
          Top = 178
          Width = 97
          Height = 17
          Caption = 'Start &Tracing'
          TabOrder = 7
        end
        object chkShowMessage: TCheckBox
          Left = 16
          Top = 216
          Width = 249
          Height = 17
          Caption = 'Pop up Alert window with &Message:'
          TabOrder = 8
          OnClick = chkShowMessageClick
        end
        object edtMsg: TEdit
          Left = 40
          Top = 240
          Width = 345
          Height = 21
          Enabled = False
          TabOrder = 9
        end
        object chkEmail: TCheckBox
          Left = 16
          Top = 272
          Width = 169
          Height = 17
          Caption = 'Send &Email notification to'
          TabOrder = 10
          OnClick = chkEmailClick
        end
        object edtRunProg: TFilenameEdit
          Left = 120
          Top = 48
          Width = 265
          Height = 21
          Filter =
            'Programs (*.EXE, *.COM, *.BAT)|*.exe; *.bat; *.com|All files (*.' +
            '*)|*.*'
          Enabled = False
          NumGlyphs = 1
          TabOrder = 1
        end
        object edtPlayWav: TFilenameEdit
          Left = 120
          Top = 81
          Width = 265
          Height = 21
          Filter =
            'WAV File (*.WAV)|*.wav|MP3 File (*.MP3)|*.mp3|All files (*.*)|*.' +
            '*'
          Enabled = False
          NumGlyphs = 1
          TabOrder = 3
        end
        object edtOpenURL: TEdit
          Left = 120
          Top = 114
          Width = 265
          Height = 21
          Enabled = False
          TabOrder = 5
          Text = 'http://'
        end
        object edtEmails: TEdit
          Tag = 1
          Left = 40
          Top = 296
          Width = 345
          Height = 21
          Enabled = False
          TabOrder = 11
          Text = '[e-mail]; [e-mail]'
          OnClick = edtEmailsClick
        end
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 405
    Height = 29
    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 = 1
    object header: TLabel
      Left = 13
      Top = 6
      Width = 77
      Height = 16
      Caption = 'Edit Rule #1'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWhite
      Font.Height = -13
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
  end
  object btnOK: TButton
    Left = 8
    Top = 400
    Width = 75
    Height = 25
    Caption = '&OK'
    Default = True
    ModalResult = 1
    TabOrder = 2
    OnClick = btnOKClick
  end
  object btnCancel: TButton
    Left = 96
    Top = 400
    Width = 75
    Height = 25
    Caption = 'C&ancel'
    ModalResult = 2
    TabOrder = 3
    OnClick = btnCancelClick
  end
end