object FormCfgFwlAvanzadasPrograma: TFormCfgFwlAvanzadasPrograma Left = 478 Top = 87 ActiveControl = PlaPCAvanzadas BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsSingle Caption = 'Opciones avanzadas de programa' ClientHeight = 494 ClientWidth = 453 Color = 14609391 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} OldCreateOrder = False Position = poScreenCenter OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object PlaPCAvanzadas: TPlaPageControl Left = 7 Top = 6 Width = 440 Height = 446 ActivePage = PlaTabSheetPuertos Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 TabStop = True object PlaTabSheetPuertos: TPlaTabSheet Caption = 'Puertos' TabVisible = True object PlaGroupBoxServidor: TPlaGroupBox Left = 14 Top = 196 Width = 409 Height = 189 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = 13977088 TitleFont.Height = -11 TitleFont.Name = 'Tahoma' TitleFont.Style = [] Caption = 'Conectarse desde otros ordenadores (Servidor)' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 1 object ImageServidor: TImage Left = 11 Top = 22 Width = 32 Height = 32 Picture.Data = {} Transparent = True end object LbInfoServPorts: TLabel Left = 58 Top = 19 Width = 339 Height = 13 Caption = 'Indica si vas a permitir que se conecten a este programa desde l' + 'a red.' Constraints.MinWidth = 339 Transparent = True WordWrap = True end object LbInfoServPorts2: TLabel Left = 58 Top = 74 Width = 339 Height = 26 AutoSize = False Caption = 'Define los puertos mediante los cuales pueden conectarse a este ' + 'programa.' Transparent = True WordWrap = True end object LbInfoSrv1: TLabel Left = 58 Top = 149 Width = 258 Height = 13 Caption = 'Escribe los puertos e intervalos separados por comas.' Transparent = True end object LbInfoSrv2: TLabel Left = 58 Top = 164 Width = 122 Height = 13 Caption = 'Ejemplo: 110, 25-30, 115' Transparent = True end object LbTcpServ: TLabel Left = 58 Top = 106 Width = 23 Height = 13 Caption = 'TCP:' Transparent = True end object LbUpdServ: TLabel Left = 261 Top = 106 Width = 24 Height = 13 Caption = 'UDP:' Transparent = True end object PlaCheckBoxPermitirServidor: TPlaCheckBox Left = 58 Top = 45 Width = 169 Height = 16 HelpContext = 238 Caption = 'Permitir (actuar como servidor)' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = PlaCheckBoxPermitirServidorClick end object PlaComboBoxTCPServidor: TPlaComboBox Left = 58 Top = 122 Width = 112 Height = 21 Cursor = crIBeam HelpContext = 236 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 1 Text = 'Todos' end object PlaComboBoxUDPServidor: TPlaComboBox Left = 261 Top = 122 Width = 124 Height = 21 HelpContext = 237 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 2 Text = 'Todos' end end object PlaGroupBoxCliente: TPlaGroupBox Left = 14 Top = 11 Width = 409 Height = 177 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = 13977088 TitleFont.Height = -11 TitleFont.Name = 'Tahoma' TitleFont.Style = [] Caption = 'Conectarse con otros ordenadores (cliente)' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 object LbInfoClPorts: TLabel Left = 58 Top = 19 Width = 339 Height = 13 Caption = 'Indica si este programa puede conectarse a la red.' Constraints.MinWidth = 339 Transparent = True WordWrap = True end object LbInfoClPort2: TLabel Left = 58 Top = 74 Width = 340 Height = 13 Caption = 'Define los puertos a los que puede conectarse este programa.' Constraints.MinWidth = 340 Transparent = True WordWrap = True end object LbTcp: TLabel Left = 58 Top = 93 Width = 23 Height = 13 Caption = 'TCP:' Transparent = True end object LbUdp: TLabel Left = 271 Top = 93 Width = 24 Height = 13 Caption = 'UDP:' Transparent = True end object ImageCliente: TImage Left = 11 Top = 22 Width = 32 Height = 32 Picture.Data = {} Transparent = True end object LbInfoCl1: TLabel Left = 58 Top = 137 Width = 258 Height = 13 Caption = 'Escribe los puertos e intervalos separados por comas.' Transparent = True end object LbInfoCl2: TLabel Left = 58 Top = 152 Width = 122 Height = 13 Caption = 'Ejemplo: 110, 25-30, 115' Transparent = True end object PlaCheckBoxPermitirCliente: TPlaCheckBox Left = 58 Top = 45 Width = 161 Height = 16 HelpContext = 235 Caption = 'Permitir (actuar como cliente)' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 OnClick = PlaCheckBoxPermitirClienteClick end object PlaComboBoxTCPCliente: TPlaComboBox Left = 58 Top = 108 Width = 112 Height = 21 HelpContext = 236 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 1 Text = 'Todos' end object PlaComboBoxUDPCliente: TPlaComboBox Left = 271 Top = 108 Width = 126 Height = 21 Cursor = crIBeam HelpContext = 237 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 2 Text = 'Todos' end end end object PlaTabSheetGeneral: TPlaTabSheet Caption = 'Direcciones' TabVisible = True object PlaGroupBoxDirecciones: TPlaGroupBox Left = 14 Top = 11 Width = 409 Height = 161 TitleFont.Charset = DEFAULT_CHARSET TitleFont.Color = 13977088 TitleFont.Height = -11 TitleFont.Name = 'Tahoma' TitleFont.Style = [] Caption = 'Direcciones permitidas' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 object LbInfoDireccion: TLabel Left = 58 Top = 19 Width = 339 Height = 13 AutoSize = False Caption = 'Define con qu� direcciones puede comunicarse el programa:' Transparent = True end object LbInfoDir2: TLabel Left = 77 Top = 121 Width = 339 Height = 13 AutoSize = False Caption = 'Escribe las direcciones e intervalos separados por comas.' Transparent = True end object LbInfoDir3: TLabel Left = 77 Top = 136 Width = 339 Height = 13 AutoSize = False Caption = 'Ejemplo: 192.168.1.1-192.168.1.254,172.1.1.1' Transparent = True end object ImageDirecciones: TImage Left = 11 Top = 22 Width = 32 Height = 32 Picture.Data = {} Transparent = True end object PlaRadioButtonDirTodas: TPlaRadioButton Left = 58 Top = 48 Width = 50 Height = 16 HelpContext = 232 Caption = 'Todas' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 0 TabStop = False OnClick = PlaRadioButtonDirTodasClick end object PlaRadioButtonDirEspecificas: TPlaRadioButton Left = 58 Top = 76 Width = 148 Height = 16 HelpContext = 233 Caption = 'Las siguientes direcciones:' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 1 TabStop = False OnClick = PlaRadioButtonDirEspecificasClick end object PlaEditDirIP: TPlaEdit Left = 76 Top = 94 Width = 290 Height = 21 HelpContext = 234 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Tahoma' Font.Style = [] ParentFont = False TabOrder = 2 Transparent = False end end end end object PlaButtonAceptar: TPlaButton Left = 297 Top = 462 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 PlaButtonCancelar: TPlaButton Left = 375 Top = 462 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 end