object fActualizacion: TfActualizacion Left = 447 Top = 316 Caption = 'Configuraci'#243'n' ClientHeight = 340 ClientWidth = 354 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = False Position = poOwnerFormCenter OnActivate = FormActivate DesignSize = ( 354 340) PixelsPerInch = 96 TextHeight = 13 object Panel2: TPanel Left = 0 Top = 306 Width = 354 Height = 34 Align = alBottom BevelOuter = bvNone ParentColor = True TabOrder = 0 object OKBtn: TButton Left = 190 Top = 2 Width = 75 Height = 25 Caption = '&Aceptar' Default = True ModalResult = 1 TabOrder = 0 OnClick = OKBtnClick end object CancelBtn: TButton Left = 270 Top = 2 Width = 75 Height = 25 Cancel = True Caption = '&Cancelar' ModalResult = 2 TabOrder = 1 end end object PageControl1: TPageControl Left = 8 Top = 8 Width = 337 Height = 289 ActivePage = TabSheet1 Anchors = [akLeft, akTop, akRight, akBottom] TabOrder = 1 object TabSheet1: TTabSheet Caption = 'Configuraci'#243'n' object GroupBox1: TGroupBox Left = 7 Top = 6 Width = 313 Height = 242 Caption = 'Configuraci'#243'n de acceso' TabOrder = 0 object Label2: TLabel Left = 32 Top = 115 Width = 259 Height = 26 Margins.Bottom = 0 Caption = 'Para poder descargar actualizaciones de FactuGES desde Internet ' + 'debe introducir su usuario y contrase'#241'a:' WordWrap = True end object Label3: TLabel Left = 41 Top = 180 Width = 39 Height = 13 Margins.Bottom = 0 Caption = 'Usuario:' end object Label4: TLabel Left = 23 Top = 205 Width = 57 Height = 13 Margins.Bottom = 0 Caption = 'Contrase'#241'a:' end object bDirectorio: TSpeedButton Left = 272 Top = 48 Width = 23 Height = 22 Caption = '...' OnClick = bDirectorioClick end object Label6: TLabel Left = 32 Top = 155 Width = 48 Height = 13 Margins.Bottom = 0 Caption = 'Direcci'#243'n:' end object edUsuario: TEdit Left = 87 Top = 176 Width = 208 Height = 21 TabOrder = 0 end object edPassword: TEdit Left = 87 Top = 201 Width = 208 Height = 21 PasswordChar = '*' TabOrder = 1 end object edRutaLan: TEdit Left = 32 Top = 48 Width = 241 Height = 21 ReadOnly = True TabOrder = 2 end object rbInternet: TRadioButton Left = 16 Top = 96 Width = 257 Height = 17 Caption = 'Actualizaci'#243'n por Internet' TabOrder = 3 OnClick = Action1Update end object rbLan: TRadioButton Left = 16 Top = 24 Width = 265 Height = 17 Caption = 'Actualizaci'#243'n por red local' TabOrder = 4 OnClick = Action1Update end object edLocation: TEdit Left = 87 Top = 151 Width = 208 Height = 21 TabOrder = 5 end end end object TabSheet2: TTabSheet Caption = 'Opciones avanzadas' ImageIndex = 1 object GroupBox2: TGroupBox Left = 8 Top = 7 Width = 313 Height = 242 Caption = 'Opciones avanzadas' TabOrder = 0 object Label1: TLabel Left = 16 Top = 19 Width = 282 Height = 13 Margins.Bottom = 0 Caption = 'Por favor, s'#243'lo modificar si se sabe lo que se est'#225' haciendo.' WordWrap = True end object Label5: TLabel Left = 16 Top = 52 Width = 177 Height = 13 Margins.Bottom = 0 Caption = 'Nombre del archivo de configuraci'#243'n:' end object Label7: TLabel Left = 200 Top = 76 Width = 90 Height = 13 Margins.Bottom = 0 Caption = 'p.e: versionlocal.ini' end object edFicheroConfig: TEdit Left = 16 Top = 72 Width = 177 Height = 21 TabOrder = 0 end end end end object JvAppRegistryStorage1: TJvAppRegistryStorage StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y' StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N' StorageOptions.BooleanAsString = False RegRoot = hkLocalMachine Root = 'Software\FactuGES\Update' SubStorages = <> Left = 326 end object JvFormStorage1: TJvFormStorage Active = False AppStorage = JvAppRegistryStorage1 AppStoragePath = '\' Options = [] StoredProps.Strings = ( 'edPassword.Text' 'edUsuario.Text' 'edRutaLan.Text' 'rbInternet.Checked' 'rbLan.Checked' 'edFicheroConfig.Text' 'edLocation.Text') StoredValues = < item Name = 'TipoActualizacion' Value = '' OnSave = JvFormStorage1StoredValues0Save end> Left = 296 end object ActionList1: TActionList Left = 242 Top = 2 object Action1: TAction Caption = 'Action1' OnUpdate = Action1Update end object Action2: TAction Caption = 'Action2' end end object JvBrowseForFolderDialog1: TJvBrowseForFolderDialog Options = [odOnlyDirectory, odStatusAvailable, odNewDialogStyle] Title = 'Ruta de las actualizaciones' Left = 268 Top = 1 end object JvProgramVersionCheck1: TJvProgramVersionCheck CheckFrequency = 0 LocalDirectory = 'update' LocalVersionInfoFileName = 'versioninfo.ini' LocationHTTP = JvProgramVersionHTTPLocationIndy1 LocationNetwork = JvProgramVersionNetworkLocation1 LocationType = pvltHTTP UserOptions = [uoLocalDirectory, uoAllowedReleaseType, uoLocationType, uoLocationNetwork, uoLocationHTTP] Left = 176 Top = 48 end object JvProgramVersionNetworkLocation1: TJvProgramVersionNetworkLocation Left = 208 Top = 48 end object JvProgramVersionHTTPLocationIndy1: TJvProgramVersionHTTPLocationIndy Left = 240 Top = 48 end end