home *** CD-ROM | disk | FTP | other *** search
- object FormEdicionReglaConex: TFormEdicionReglaConex
- Left = 492
- Top = 105
- ActiveControl = PlaPageControlEdicionReglaConex
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsSingle
- Caption = 'Edici�n de la regla de conexi�n'
- ClientHeight = 437
- ClientWidth = 444
- Color = 14609391
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OldCreateOrder = False
- Position = poScreenCenter
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object PlaButtonCancelar: TPlaButton
- Left = 345
- Top = 405
- Width = 70
- Height = 21
- HelpContext = 194
- Caption = 'Cancelar'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = PlaButtonCancelarClick
- Cancel = True
- end
- object PlaButtonAceptar: TPlaButton
- Left = 267
- Top = 405
- Width = 70
- Height = 21
- HelpContext = 193
- Caption = 'Aceptar'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = PlaButtonAceptarClick
- Default = True
- end
- object PlaPageControlEdicionReglaConex: TPlaPageControl
- Left = 6
- Top = 7
- Width = 430
- Height = 383
- ActivePage = PlaTabSheetProtocolos
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- TabStop = True
- object PlaTabSheetGeneral: TPlaTabSheet
- Caption = 'General'
- TabVisible = True
- object PlaGroupBoxSobreRegla: TPlaGroupBox
- Left = 14
- Top = 8
- Width = 379
- Height = 187
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = 13977088
- TitleFont.Height = -11
- TitleFont.Name = 'Tahoma'
- TitleFont.Style = []
- Caption = 'Sobre la regla'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- object Label1: TLabel
- Left = 58
- Top = 19
- Width = 309
- Height = 26
- AutoSize = False
- Caption =
- 'Escribe el nombre que deseas asignar a la regla. Te servir� para' +
- ' identificarla posteriormente.'
- Transparent = True
- WordWrap = True
- end
- object Label4: TLabel
- Left = 58
- Top = 158
- Width = 35
- Height = 13
- Caption = 'Acci�n:'
- Transparent = True
- end
- object Label2: TLabel
- Left = 58
- Top = 58
- Width = 94
- Height = 13
- Caption = 'Nombre de la regla:'
- end
- object ImageSobreRegla: TImage
- Left = 11
- Top = 22
- Width = 32
- Height = 32
- Picture.Data = {<image001.bmp>}
- Transparent = True
- end
- object Label3: TLabel
- Left = 58
- Top = 102
- Width = 309
- Height = 39
- AutoSize = False
- Caption =
- 'Las reglas de conexi�n pueden usarse para permitir o bloquear la' +
- 's comunicaciones de red. Selecciona qu� acci�n deseas que realic' +
- 'e esta regla.'
- Transparent = True
- WordWrap = True
- end
- object PlaComboBoxAccion: TPlaComboBox
- Left = 105
- Top = 154
- Width = 180
- Height = 21
- HelpContext = 244
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- Style = csDropDownList
- TabOrder = 1
- end
- object PlaEditNombreRegla: TPlaEdit
- Left = 58
- Top = 74
- Width = 309
- Height = 21
- Cursor = crIBeam
- HelpContext = 243
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- Transparent = False
- end
- end
- object PlaGroupBoxAdaptadores: TPlaGroupBox
- Left = 14
- Top = 204
- Width = 379
- Height = 104
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = 13977088
- TitleFont.Height = -11
- TitleFont.Name = 'Tahoma'
- TitleFont.Style = []
- Caption = 'Adaptadores de red'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- object Label5: TLabel
- Left = 58
- Top = 19
- Width = 309
- Height = 39
- AutoSize = False
- Caption =
- 'Las comunicaciones se llevan a cabo mediante adaptadores de red ' +
- '(modems, tarjetas de red, etc). Selecciona sobre qu� adaptador d' +
- 'e red deseas que act�e la regla.'
- Transparent = True
- WordWrap = True
- end
- object ImageAdaptadores: TImage
- Left = 11
- Top = 22
- Width = 32
- Height = 32
- Picture.Data = {<image002.bmp>}
- Transparent = True
- end
- object Label6: TLabel
- Left = 58
- Top = 75
- Width = 89
- Height = 13
- Caption = 'Adaptador de red:'
- Transparent = True
- end
- object PlaComboBoxAdaptador: TPlaComboBox
- Left = 158
- Top = 71
- Width = 209
- Height = 21
- HelpContext = 245
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- Style = csDropDownList
- TabOrder = 0
- end
- end
- end
- object PlaTabSheetProtocolos: TPlaTabSheet
- Caption = 'Protocolos y puertos'
- TabVisible = True
- object PlaGroupBoxProtocolos: TPlaGroupBox
- Left = 18
- Top = 14
- Width = 399
- Height = 315
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = 13977088
- TitleFont.Height = -11
- TitleFont.Name = 'Tahoma'
- TitleFont.Style = []
- Caption = 'Protocolos'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- object Label7: TLabel
- Left = 58
- Top = 19
- Width = 309
- Height = 26
- AutoSize = False
- Caption =
- 'Selecciona el protocolo, sentido de la comunicaci�n y puertos so' +
- 'bre los que quieres que act�e la regla.'
- Transparent = True
- WordWrap = True
- end
- object ImageProtocolos: TImage
- Left = 11
- Top = 22
- Width = 32
- Height = 32
- Picture.Data = {<image003.bmp>}
- Transparent = True
- end
- object Label10: TLabel
- Left = 58
- Top = 133
- Width = 132
- Height = 13
- Caption = 'Sentido de la comunicaci�n:'
- Transparent = True
- end
- object Label9: TLabel
- Left = 58
- Top = 101
- Width = 309
- Height = 26
- AutoSize = False
- Caption =
- 'Selecciona el sentido de la comunicaci�n (entrada o salida) sobr' +
- 'e el que deseas que act�e la regla.'
- Transparent = True
- WordWrap = True
- end
- object Label8: TLabel
- Left = 58
- Top = 51
- Width = 49
- Height = 13
- Caption = 'Protocolo:'
- Transparent = True
- end
- object PanelICMP: TPlaPanel
- Left = 0
- Top = 183
- Width = 399
- Height = 132
- Transparent = False
- object LabelInfoICMP: TLabel
- Left = 58
- Top = 0
- Width = 315
- Height = 13
- Caption =
- 'Selecciona los servicios ICMP a los que quieras aplicar esta reg' +
- 'la.'
- Constraints.MinWidth = 315
- Transparent = True
- WordWrap = True
- end
- object BtnICMPUncheckAll: TPlaButton
- Left = 270
- Top = 99
- Width = 97
- Height = 21
- Caption = 'Desactivar todos'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- OnClick = BtnICMPUncheckAllClick
- end
- object BtnICMPCheckAll: TPlaButton
- Left = 166
- Top = 99
- Width = 97
- Height = 21
- Caption = 'Activar todos'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = BtnICMPCheckAllClick
- end
- object PlaListBoxICMP: TPlaListBox
- Left = 58
- Top = 16
- Width = 309
- Height = 75
- TabOrder = 2
- UseCheckBoxes = True
- end
- end
- object PanelTcpUdp: TPlaPanel
- Left = 0
- Top = 183
- Width = 399
- Height = 132
- object LabelInfoPorts: TLabel
- Left = 58
- Top = 0
- Width = 309
- Height = 13
- AutoSize = False
- Caption = 'Indica los puertos sobre los que se aplica la regla.'
- Transparent = True
- end
- object LabelLocalPorts: TLabel
- Left = 58
- Top = 19
- Width = 76
- Height = 13
- Caption = 'Puertos locales:'
- Transparent = True
- end
- object LbInfoPorts2: TLabel
- Left = 58
- Top = 68
- Width = 258
- Height = 13
- Caption = 'Escribe los puertos e intervalos separados por comas.'
- Transparent = True
- end
- object LbInfoPorts3: TLabel
- Left = 58
- Top = 83
- Width = 122
- Height = 13
- Caption = 'Ejemplo: 110, 25-30, 115'
- Transparent = True
- end
- object LabelRemotePorts: TLabel
- Left = 219
- Top = 19
- Width = 83
- Height = 13
- Caption = 'Puertos remotos:'
- Transparent = True
- end
- object PlaComboBoxPuertosLocales: TPlaComboBox
- Left = 58
- Top = 35
- Width = 145
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- Text = 'Todos'
- end
- object PlaComboBoxPuertosRemotos: TPlaComboBox
- Left = 219
- Top = 35
- Width = 145
- Height = 21
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- Text = 'Todos'
- end
- end
- object PanelIP: TPlaPanel
- Left = 0
- Top = 183
- Width = 399
- Height = 132
- Transparent = False
- object LabelInfoTypeIP: TLabel
- Left = 58
- Top = 0
- Width = 315
- Height = 13
- Caption = 'Indica los protocolos a los que quieras aplicar esta regla.'
- Constraints.MinWidth = 315
- Transparent = True
- WordWrap = True
- end
- object PlaListBoxIPAddr: TPlaListBox
- Left = 58
- Top = 16
- Width = 309
- Height = 75
- TabOrder = 0
- UseCheckBoxes = True
- end
- object BtnIPCheckAll: TPlaButton
- Left = 166
- Top = 99
- Width = 97
- Height = 21
- Caption = 'Activar todos'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = BtnIPCheckAllClick
- end
- object BtnIPUncheckAll: TPlaButton
- Left = 270
- Top = 99
- Width = 97
- Height = 21
- Caption = 'Desactivar todos'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- OnClick = BtnIPUncheckAllClick
- end
- end
- object PlaComboBoxSentido: TPlaComboBox
- Left = 58
- Top = 149
- Width = 175
- Height = 21
- HelpContext = 247
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- Style = csDropDownList
- TabOrder = 1
- end
- object PlaComboBoxProtocolo: TPlaComboBox
- Left = 58
- Top = 67
- Width = 175
- Height = 21
- HelpContext = 246
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- Style = csDropDownList
- TabOrder = 0
- OnChange = PlaComboBoxProtocoloChange
- end
- end
- end
- object PlaTabSheetDirecciones: TPlaTabSheet
- Caption = 'Direcciones'
- TabVisible = True
- object PlaGroupBoxDireccionesRemotas: TPlaGroupBox
- Left = 14
- Top = 8
- Width = 379
- Height = 212
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = 13977088
- TitleFont.Height = -11
- TitleFont.Name = 'Tahoma'
- TitleFont.Style = []
- Caption = 'Direcciones remotas'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- object ImageDirecciones: TImage
- Left = 11
- Top = 22
- Width = 32
- Height = 32
- Picture.Data = {<image004.bmp>}
- Transparent = True
- end
- object LabelInfoDirecciones: TLabel
- Left = 58
- Top = 19
- Width = 310
- Height = 13
- Caption = 'Indica las direcciones remotas sobre las que se aplica la regla.'
- Constraints.MinWidth = 310
- Transparent = True
- WordWrap = True
- end
- object LabelDirInfo1: TLabel
- Left = 77
- Top = 172
- Width = 290
- Height = 13
- Caption = 'Escribe las direcciones e intervalos separados por comas.'
- Constraints.MinWidth = 290
- Transparent = True
- WordWrap = True
- end
- object LabelDirInfo2: TLabel
- Left = 77
- Top = 187
- Width = 290
- Height = 13
- Caption = 'Ejemplo: 192.168.1.1-192.168.1.254, 172.1.1.1'
- Constraints.MinWidth = 290
- Transparent = True
- WordWrap = True
- end
- object PlaRadioButtonCualquierDireccion: TPlaRadioButton
- Left = 58
- Top = 48
- Width = 111
- Height = 16
- HelpContext = 248
- Caption = 'Cualquier direcci�n'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- TabStop = False
- OnClick = PlaRadioButtonCualquierDireccionClick
- end
- object PlaRadioButtonDireccionMAC: TPlaRadioButton
- Left = 58
- Top = 76
- Width = 182
- Height = 16
- HelpContext = 249
- Caption = 'Direcci�n de tarjeta de red (MAC)'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- TabStop = False
- OnClick = PlaRadioButtonDireccionMACClick
- end
- object PlaRadioButtonDireccionesIP: TPlaRadioButton
- Left = 58
- Top = 127
- Width = 88
- Height = 16
- HelpContext = 250
- Caption = 'Direcciones IP'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- TabStop = False
- OnClick = PlaRadioButtonDireccionesIPClick
- end
- object PlaEditDireccionesIP: TPlaEdit
- Left = 77
- Top = 145
- Width = 290
- Height = 21
- Cursor = crIBeam
- HelpContext = 251
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- Transparent = False
- end
- object PlaMacAddress: TPlaMacAddressEdit
- Left = 77
- Top = 94
- Width = 144
- Height = 21
- SeparatorChar = '-'
- Text = '000000000000'
- FormattedText = '0.0.0.0.0.0'
- end
- end
- end
- end
- end
-