home *** CD-ROM | disk | FTP | other *** search
- object Form7: TForm7
- Left = 501
- Top = 163
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Lista blanca y negra para '
- ClientHeight = 371
- ClientWidth = 404
- Color = 14215660
- 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 PlaGroupBox1: TPlaGroupBox
- Left = 14
- Top = 11
- Width = 377
- Height = 156
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = 13977088
- TitleFont.Height = -11
- TitleFont.Name = 'Tahoma'
- TitleFont.Style = []
- Caption = 'Lista negra de sitios Web'
- TabOrder = 0
- object Label1: TLabel
- Left = 58
- Top = 19
- Width = 311
- Height = 39
- Caption =
- 'Puedes definir p�ginas Web que este usuario no puede visualizar ' +
- 'en ning�n caso, independientemente de las categor�as incluidas e' +
- 'n su filtro.'
- WordWrap = True
- end
- object Image1: TImage
- Left = 11
- Top = 22
- Width = 32
- Height = 32
- Picture.Data = {<image001.bmp>}
- Transparent = True
- end
- object PlaButton1: TPlaButton
- Left = 288
- Top = 66
- Width = 75
- Height = 21
- Caption = 'Nueva...'
- TabOrder = 0
- OnClick = PlaButton1Click
- end
- object PlaButton2: TPlaButton
- Left = 288
- Top = 94
- Width = 75
- Height = 21
- Caption = 'Eliminar'
- TabOrder = 1
- OnClick = PlaButton2Click
- end
- object PlaButton3: TPlaButton
- Left = 288
- Top = 122
- Width = 75
- Height = 21
- Caption = 'Editar...'
- TabOrder = 2
- OnClick = PlaButton3Click
- end
- object PlaListBox1: TPlaListBox
- Left = 58
- Top = 66
- Width = 217
- Height = 77
- TabOrder = 3
- OnClick = PlaListBox1Click
- OnDblClick = PlaListBox1DblClick
- end
- end
- object PlaGroupBox2: TPlaGroupBox
- Left = 14
- Top = 178
- Width = 377
- Height = 146
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = 13977088
- TitleFont.Height = -11
- TitleFont.Name = 'Tahoma'
- TitleFont.Style = []
- Caption = 'Lista blanca de sitios Web'
- TabOrder = 1
- object Label2: TLabel
- Left = 58
- Top = 19
- Width = 311
- Height = 26
- Caption =
- 'Puedes definir p�ginas Web que este usuario s� puede visualizar,' +
- ' independientemente de las categor�as incluidas en su filtro.'
- WordWrap = True
- end
- object Image2: TImage
- Left = 11
- Top = 22
- Width = 32
- Height = 32
- Picture.Data = {<image002.bmp>}
- Transparent = True
- end
- object PlaListBox2: TPlaListBox
- Left = 58
- Top = 55
- Width = 217
- Height = 77
- TabOrder = 0
- OnClick = PlaListBox2Click
- OnDblClick = PlaListBox2DblClick
- end
- object PlaButton4: TPlaButton
- Left = 288
- Top = 55
- Width = 75
- Height = 21
- Caption = 'Nueva...'
- TabOrder = 1
- OnClick = PlaButton4Click
- end
- object PlaButton5: TPlaButton
- Left = 288
- Top = 83
- Width = 75
- Height = 21
- Caption = 'Eliminar'
- TabOrder = 2
- OnClick = PlaButton5Click
- end
- object PlaButton9: TPlaButton
- Left = 288
- Top = 111
- Width = 75
- Height = 21
- Caption = 'Editar...'
- TabOrder = 3
- OnClick = PlaButton9Click
- end
- end
- object ButtonAceptar: TPlaButton
- Tag = 2200
- Left = 224
- Top = 340
- Width = 73
- Height = 21
- Anchors = [akRight, akBottom]
- Caption = '&Aceptar'
- TabOrder = 2
- OnClick = ButtonAceptarClick
- Default = True
- end
- object ButtonCancel: TPlaButton
- Tag = 2400
- Left = 305
- Top = 340
- Width = 73
- Height = 21
- Anchors = [akRight, akBottom]
- Caption = '&Cancelar'
- TabOrder = 3
- TabStop = False
- Cancel = True
- ModalResult = 2
- end
- end
-