home *** CD-ROM | disk | FTP | other *** search
- object FormAnadirPrograma: TFormAnadirPrograma
- Left = 295
- Top = 132
- BorderIcons = [biSystemMenu, biHelp]
- BorderStyle = bsSingle
- Caption = 'A�adir programa'
- ClientHeight = 308
- ClientWidth = 416
- Color = 14609391
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Tahoma'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OldCreateOrder = False
- Position = poScreenCenter
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object PlaButtonAceptar: TPlaButton
- Left = 256
- Top = 280
- Width = 70
- Height = 21
- HelpContext = 193
- Caption = 'Aceptar'
- TabOrder = 1
- OnClick = PlaButtonAceptarClick
- Default = True
- end
- object PlaButtonCancelar: TPlaButton
- Left = 333
- Top = 280
- Width = 70
- Height = 21
- HelpContext = 194
- Caption = 'Cancelar'
- TabOrder = 2
- Cancel = True
- ModalResult = 2
- end
- object PlaGroupBoxPrograma: TPlaGroupBox
- Left = 14
- Top = 11
- Width = 390
- Height = 258
- TitleFont.Charset = DEFAULT_CHARSET
- TitleFont.Color = 13977088
- TitleFont.Height = -11
- TitleFont.Name = 'Tahoma'
- TitleFont.Style = []
- Caption = 'Programa'
- TabOrder = 0
- object Label1: TLabel
- Left = 58
- Top = 19
- Width = 322
- Height = 26
- AutoSize = False
- Caption =
- 'Introduce los datos del nuevo programa cuya comunicaci�n deseas ' +
- 'configurar.'
- Transparent = True
- WordWrap = True
- end
- object Image1: TImage
- Left = 11
- Top = 22
- Width = 32
- Height = 32
- Picture.Data = {<image001.bmp>}
- Transparent = True
- end
- object Label2: TLabel
- Left = 58
- Top = 59
- Width = 27
- Height = 13
- Caption = 'Ruta:'
- Transparent = True
- end
- object Label3: TLabel
- Left = 58
- Top = 104
- Width = 255
- Height = 26
- Caption =
- 'Selecciona la acci�n a realizar cuando este programa intente con' +
- 'ectarse a la red'
- Transparent = True
- WordWrap = True
- end
- object LabelAvanzadas: TLabel
- Left = 58
- Top = 184
- Width = 275
- Height = 41
- AutoSize = False
- Caption =
- 'Las opciones avanzadas te permiten configurar los puertos y dire' +
- 'cciones a los que deseas permitir el acceso.'
- Transparent = True
- WordWrap = True
- end
- object Label4: TLabel
- Left = 58
- Top = 152
- Width = 75
- Height = 13
- AutoSize = False
- Caption = 'Acci�n:'
- end
- object PlaEditRuta: TPlaEdit
- Left = 58
- Top = 75
- Width = 273
- Height = 21
- HelpContext = 230
- TabOrder = 0
- Transparent = False
- OnChange = PlaEditRutaChange
- end
- object PlaButtonRuta: TPlaButton
- Left = 343
- Top = 75
- Width = 35
- Height = 21
- Caption = '...'
- TabOrder = 1
- OnClick = PlaButtonRutaClick
- end
- object PlaButtonOpcionesAvanzadas: TPlaButton
- Left = 58
- Top = 224
- Width = 125
- Height = 21
- HelpContext = 227
- Caption = 'Opciones avanzadas...'
- TabOrder = 2
- OnClick = PlaButtonOpcionesAvanzadasClick
- end
- object ComboAcciones: TPlaComboBox
- Left = 140
- Top = 148
- Width = 191
- Height = 21
- HelpContext = 224
- Style = csDropDownList
- TabOrder = 3
- OnChange = ComboAccionesChange
- Items.Strings = (
- 'Permitir comunicaci�n'
- 'Denegar comunicaci�n'
- 'Preguntar')
- end
- end
- object OpenDialog: TOpenDialog
- FilterIndex = 0
- Left = 364
- Top = 54
- end
- end
-