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 = {} 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 = {} 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