From 5d5d98d8d063ac1d4cd214a15aeae9c3564be576 Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Thu, 24 Jul 2008 14:39:44 +0000
Subject: [PATCH] Repaso general

git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@293 f4e31baf-9722-1c47-927c-6f952f962d4b
---
 .../Controller/uConfiguracionController.pas   |   9 +-
 .../Views/uEditorConfiguracion.dfm            |   1 +
 .../Views/uViewConfiguracionGeneral.dfm       |  33 +-
 .../Views/uViewConfiguracionGeneral.pas       |  27 +-
 Source/Cliente/FactuGES.bdsproj               | 504 ------------------
 Source/Cliente/FactuGES.dpr                   |   2 -
 Source/Cliente/FactuGES.dproj                 |  32 +-
 Source/GUIBase/GUIBase.res                    | Bin 4748 -> 384 bytes
 Source/Servidor/FactuGES_Server.RES           | Bin 23352 -> 23344 bytes
 Source/Servidor/FactuGES_Server.rc            |   2 +-
 10 files changed, 70 insertions(+), 540 deletions(-)

diff --git a/Source/ApplicationBase/Configuracion/Controller/uConfiguracionController.pas b/Source/ApplicationBase/Configuracion/Controller/uConfiguracionController.pas
index 64903ca2..9ebe67bc 100644
--- a/Source/ApplicationBase/Configuracion/Controller/uConfiguracionController.pas
+++ b/Source/ApplicationBase/Configuracion/Controller/uConfiguracionController.pas
@@ -16,6 +16,7 @@ type
   IConfiguracionController = interface(IControllerBase)
     ['{F29215BA-0D34-4AE9-B9A9-C80ABF49A81D}']
     procedure ConfigurarAplicacion;
+    procedure AplicarConfiguracion;    
     procedure SalvarConfiguracion;
     procedure CargarConfiguracion;
 
@@ -35,6 +36,7 @@ type
     FAppXMLFileStorage : TJvAppXMLFileStorage;
   public
     procedure SalvarConfiguracion;
+    procedure AplicarConfiguracion;
     procedure CargarConfiguracion;
     procedure ConfigurarAplicacion;
 
@@ -55,7 +57,7 @@ type
 implementation
 
 uses
-  Forms, uEditorConfiguracion, uViewConfiguracionGeneral,
+  Forms, uEditorConfiguracion, uViewConfiguracionGeneral, uDMBase, 
   JvAppStorage, uAppInfoUtils, Controls, uViewConfiguracionRegistryUtils;
 
 const
@@ -63,6 +65,11 @@ const
 
 { TGestorConfiguracion }
 
+procedure TConfiguracionController.AplicarConfiguracion;
+begin
+	//
+end;
+
 procedure TConfiguracionController.CargarConfiguracion;
 begin
   FAppXMLFileStorage.Reload;
diff --git a/Source/ApplicationBase/Configuracion/Views/uEditorConfiguracion.dfm b/Source/ApplicationBase/Configuracion/Views/uEditorConfiguracion.dfm
index e24562a9..1e6bad15 100644
--- a/Source/ApplicationBase/Configuracion/Views/uEditorConfiguracion.dfm
+++ b/Source/ApplicationBase/Configuracion/Views/uEditorConfiguracion.dfm
@@ -61,6 +61,7 @@ object fConfiguracionEditor: TfConfiguracionEditor
       Width = 75
       Height = 25
       Anchors = [akTop, akRight]
+      Cancel = True
       Caption = '&Cancelar'
       ModalResult = 2
       TabOrder = 0
diff --git a/Source/ApplicationBase/Configuracion/Views/uViewConfiguracionGeneral.dfm b/Source/ApplicationBase/Configuracion/Views/uViewConfiguracionGeneral.dfm
index e332c2b1..2cb891ee 100644
--- a/Source/ApplicationBase/Configuracion/Views/uViewConfiguracionGeneral.dfm
+++ b/Source/ApplicationBase/Configuracion/Views/uViewConfiguracionGeneral.dfm
@@ -1,4 +1,5 @@
 inherited frViewConfiguracionGeneral: TfrViewConfiguracionGeneral
+  Height = 375
   inherited Panel1: TPanel
     inherited Label3: TLabel
       Width = 429
@@ -9,7 +10,7 @@ inherited frViewConfiguracionGeneral: TfrViewConfiguracionGeneral
   object Panel2: TPanel
     AlignWithMargins = True
     Left = 5
-    Top = 109
+    Top = 142
     Width = 441
     Height = 22
     Margins.Left = 5
@@ -34,6 +35,7 @@ inherited frViewConfiguracionGeneral: TfrViewConfiguracionGeneral
     ParentBackground = False
     ParentFont = False
     TabOrder = 2
+    ExplicitTop = 109
     object Label2: TLabel
       Left = 6
       Top = 4
@@ -49,7 +51,7 @@ inherited frViewConfiguracionGeneral: TfrViewConfiguracionGeneral
     Left = 5
     Top = 68
     Width = 441
-    Height = 41
+    Height = 74
     Margins.Left = 5
     Margins.Top = 0
     Margins.Right = 5
@@ -61,24 +63,34 @@ inherited frViewConfiguracionGeneral: TfrViewConfiguracionGeneral
     object Label1: TLabel
       Left = 17
       Top = 14
-      Width = 88
+      Width = 54
       Height = 13
-      Caption = 'Esquema de color:'
+      Caption = 'Apariencia:'
+      Visible = False
     end
     object cbEsquemaColor: TComboBox
-      Left = 111
+      Left = 77
       Top = 11
-      Width = 168
+      Width = 202
       Height = 21
       Style = csDropDownList
       ItemHeight = 13
       TabOrder = 0
+      Visible = False
+    end
+    object cbMostrarMenu: TCheckBox
+      Left = 17
+      Top = 43
+      Width = 262
+      Height = 17
+      Caption = 'Mostrar siempre men'#250' principal'
+      TabOrder = 1
     end
   end
   object Panel4: TPanel
     AlignWithMargins = True
     Left = 5
-    Top = 131
+    Top = 164
     Width = 441
     Height = 72
     Margins.Left = 5
@@ -89,6 +101,7 @@ inherited frViewConfiguracionGeneral: TfrViewConfiguracionGeneral
     BevelOuter = bvNone
     ParentColor = True
     TabOrder = 4
+    ExplicitTop = 131
     object Label4: TLabel
       Left = 17
       Top = 43
@@ -126,7 +139,7 @@ inherited frViewConfiguracionGeneral: TfrViewConfiguracionGeneral
   object Panel5: TPanel
     AlignWithMargins = True
     Left = 5
-    Top = 203
+    Top = 236
     Width = 441
     Height = 22
     Margins.Left = 5
@@ -151,6 +164,7 @@ inherited frViewConfiguracionGeneral: TfrViewConfiguracionGeneral
     ParentBackground = False
     ParentFont = False
     TabOrder = 5
+    ExplicitTop = 203
     object Label5: TLabel
       Left = 6
       Top = 4
@@ -164,7 +178,7 @@ inherited frViewConfiguracionGeneral: TfrViewConfiguracionGeneral
   object Panel6: TPanel
     AlignWithMargins = True
     Left = 5
-    Top = 225
+    Top = 258
     Width = 441
     Height = 72
     Margins.Left = 5
@@ -175,6 +189,7 @@ inherited frViewConfiguracionGeneral: TfrViewConfiguracionGeneral
     BevelOuter = bvNone
     ParentColor = True
     TabOrder = 6
+    ExplicitTop = 225
     object lblLongMinPass: TLabel
       Left = 17
       Top = 43
diff --git a/Source/ApplicationBase/Configuracion/Views/uViewConfiguracionGeneral.pas b/Source/ApplicationBase/Configuracion/Views/uViewConfiguracionGeneral.pas
index 03b2c868..bbcdcc4d 100644
--- a/Source/ApplicationBase/Configuracion/Views/uViewConfiguracionGeneral.pas
+++ b/Source/ApplicationBase/Configuracion/Views/uViewConfiguracionGeneral.pas
@@ -31,6 +31,7 @@ type
     lblLongMinPass: TLabel;
     cbPassObligatoria: TCheckBox;
     edtLongMinPass: TcxSpinEdit;
+    cbMostrarMenu: TCheckBox;
   private
     { Private declarations }
   public
@@ -43,18 +44,31 @@ type
 implementation
 
 uses
-  uFactuGES_App;
+  uFactuGES_App, uDMBase;
 
 {$R *.dfm}
 
 { TfrViewConfiguracionGeneral }
 
 procedure TfrViewConfiguracionGeneral.CargarValores;
+{var
+  ASkinName : String;}
 begin
   inherited;
   edtLongMinPass.Text := AppFactuGES.Configuracion.GetSettingAsString('MinPasswordLength', '3');
   edtNumIntentos.Text := AppFactuGES.Configuracion.GetSettingAsString('MaxLoginAttempts', '3');
   cbPassObligatoria.Checked := AppFactuGES.Configuracion.GetSettingAsBoolean('ForcePassword', True);
+
+  cbMostrarMenu.Checked := AppFactuGES.Configuracion.GetSettingAsBoolean('MostrarBarraMenus', True);
+
+  {cbEsquemaColor.Items.Add('Usar estilo nativo de Windows');
+  cbEsquemaColor.Items.AddStrings(dmBase.DarListaSkins);
+
+  ASkinName := AppFactuGES.Configuracion.GetSettingAsString('SkinName', '');
+  if ASkinName = '' then
+    cbEsquemaColor.ItemIndex := 0
+  else
+    cbEsquemaColor.ItemIndex := cbEsquemaColor.Items.IndexOf(ASkinName);}
 end;
 
 class function TfrViewConfiguracionGeneral.DarEtiqueta: String;
@@ -68,11 +82,22 @@ begin
 end;
 
 procedure TfrViewConfiguracionGeneral.GuardarValores;
+{var
+  ASkinName : String;}
 begin
   inherited;
   AppFactuGES.Configuracion.SetSettingAsString('MinPasswordLength', edtLongMinPass.Text);
   AppFactuGES.Configuracion.SetSettingAsString('MaxLoginAttempts', edtNumIntentos.Text);
   AppFactuGES.Configuracion.SetSettingAsBoolean('ForcePassword', cbPassObligatoria.Checked);
+
+  AppFactuGES.Configuracion.SetSettingAsBoolean('MostrarBarraMenus', cbMostrarMenu.Checked);
+
+  {if cbEsquemaColor.ItemIndex = 0 then
+    ASkinName := ''
+  else
+    ASkinName := cbEsquemaColor.Text;
+
+  AppFactuGES.Configuracion.SetSettingAsString('SkinName', ASkinName);}
 end;
 
 end.
diff --git a/Source/Cliente/FactuGES.bdsproj b/Source/Cliente/FactuGES.bdsproj
index 48e333ed..8ef2f326 100644
--- a/Source/Cliente/FactuGES.bdsproj
+++ b/Source/Cliente/FactuGES.bdsproj
@@ -126,7 +126,6 @@
 			<Directories Name="SearchPath">..\Lib;..\Modulos\Lib</Directories>
 			<Directories Name="Packages">PluginSDK_D10R;GUISDK_D10;DataAbstract_D10;Base;GUIBase;Usuarios;Contactos_plugin;Empresas_plugin;Empresas_controller;Empresas_model;rtl</Directories>
 			<Directories Name="Conditionals">_VER6;EUREKALOG;EUREKALOG_VER6</Directories>
-			<Directories Name="DebugSourceDirs">T:\Codigo (Luis Leon)\Source\Modulos\Pedidos de cliente\Controller\</Directories>
 			<Directories Name="UsePackages">True</Directories>
 		</Directories>
 		<Parameters>
@@ -142,7 +141,6 @@
 		<Language>
 			<Language Name="ActiveLang"></Language>
 			<Language Name="ProjectLang">$00000000</Language>
-			<Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language>
 		</Language>
 		<VersionInfo>
 			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
@@ -177,506 +175,4 @@
       <Excluded_Packages Name="c:\archivos de programa\borland\delphi10\Bin\dclie100.bpl">File c:\archivos de programa\borland\delphi10\Bin\dclie100.bpl not found</Excluded_Packages>
     </Excluded_Packages>
   </Delphi.Personality>
-<!-- EurekaLog First Line
-[Exception Log]
-EurekaLog Version=6006
-Activate=1
-Activate Handle=1
-Save Log File=1
-Foreground Tab=0
-Freeze Activate=0
-Freeze Timeout=0
-Freeze Message=The application seems to be frozen.
-SMTP From=eurekalog@email.com
-SMTP Host=
-SMTP Port=25
-SMTP UserID=
-SMTP Password=
-Append to Log=0
-Show TerminateBtn=1
-TerminateBtn Operation=1
-Errors Number=32
-Errors Terminate=3
-Email Address=
-Email Object=
-Email Send Options=0
-Output Path=
-Encrypt Password=
-AutoCloseDialogSecs=0
-WebSendMode=0
-SupportULR=
-HTMLLayout Count=15
-HTMLLine0="%3Chtml%3E"
-HTMLLine1="  %3Chead%3E"
-HTMLLine2="  %3C/head%3E"
-HTMLLine3="  %3Cbody TopMargin=10 LeftMargin=10%3E"
-HTMLLine4="    %3Ctable width="100%%" border="0"%3E"
-HTMLLine5="      %3Ctr%3E"
-HTMLLine6="        %3Ctd nowrap%3E"
-HTMLLine7="          %3Cfont face="Lucida Console, Courier" size="2"%3E"
-HTMLLine8="            %3C%%HTML_TAG%%%3E"
-HTMLLine9="          %3C/font%3E"
-HTMLLine10="        %3C/td%3E"
-HTMLLine11="      %3C/tr%3E"
-HTMLLine12="    %3C/table%3E"
-HTMLLine13="  %3C/body%3E"
-HTMLLine14="%3C/html%3E"
-AutoCrashOperation=1
-AutoCrashNumber=10
-AutoCrashMinutes=1
-WebURL=
-WebUserID=
-WebPassword=
-WebPort=0
-AttachedFiles=
-Count=0
-EMail Message Line Count=0
-loNoDuplicateErrors=0
-loAppendReproduceText=0
-loDeleteLogAtVersionChange=0
-loAddComputerNameInLogFileName=0
-loSaveModulesSection=1
-loSaveCPUSection=1
-soAppStartDate=1
-soAppName=1
-soAppVersionNumber=1
-soAppParameters=1
-soAppCompilationDate=1
-soExcDate=1
-soExcAddress=1
-soExcModule=1
-soExcType=1
-soExcMessage=1
-soActCtlsFormClass=1
-soActCtlsFormText=1
-soActCtlsControlClass=1
-soActCtlsControlText=1
-soCmpName=1
-soCmpUser=1
-soCmpTotalMemory=1
-soCmpFreeMemory=1
-soCmpTotalDisk=1
-soCmpFreeDisk=1
-soCmpSysUpTime=1
-soCmpProcessor=1
-soCmpDisplayMode=1
-soOSType=1
-soOSBuildN=1
-soOSUpdate=1
-soOSLanguage=1
-soNetIP=1
-soNetSubmask=1
-soNetGateway=1
-soNetDNS1=1
-soNetDNS2=1
-soNetDHCP=1
-sndShowSendDialog=1
-sndShowSuccessFailureMsg=0
-sndSendEntireLog=0
-sndSendXMLLogCopy=0
-sndSendScreenshot=0
-sndUseOnlyActiveWindow=0
-sndSendLastHTMLPage=1
-sndSendInSeparatedThread=0
-sndAddDateInFileName=0
-sndCompressAllFiles=0
-edoShowExceptionDialog=1
-edoSendEmailChecked=1
-edoAttachScreenshotChecked=1
-edoShowCopyToClipOption=1
-edoShowDetailsButton=1
-edoShowInDetailedMode=0
-edoShowInTopMostMode=0
-edoUseEurekaLogLookAndFeel=1
-csoShowDLLs=1
-csoShowBPLs=1
-csoShowBorlandThreads=1
-csoShowWindowsThreads=1
-csoShowProcedureOffset=0
-boActivateCrashDetection=0
-boPauseBorlandThreads=0
-boDoNotPauseMainThread=0
-boPauseWindowsThreads=0
-boUseMainModuleOptions=1
-boCopyLogInCaseOfError=1
-boSaveCompressedCopyInCaseOfError=0
-Count mtInformationMsgCaption=1
-mtInformationMsgCaption0="Information."
-Count mtQuestionMsgCaption=1
-mtQuestionMsgCaption0="Question."
-Count mtDialog_Caption=1
-mtDialog_Caption0="Error."
-Count mtDialog_ErrorMsgCaption=2
-mtDialog_ErrorMsgCaption0="An error has occurred during program execution."
-mtDialog_ErrorMsgCaption1="Please read the following information for further details."
-Count mtDialog_GeneralCaption=1
-mtDialog_GeneralCaption0="General"
-Count mtDialog_GeneralHeader=1
-mtDialog_GeneralHeader0="General Information"
-Count mtDialog_CallStackCaption=1
-mtDialog_CallStackCaption0="Call Stack"
-Count mtDialog_CallStackHeader=1
-mtDialog_CallStackHeader0="Call Stack Information"
-Count mtDialog_ModulesCaption=1
-mtDialog_ModulesCaption0="Modules"
-Count mtDialog_ModulesHeader=1
-mtDialog_ModulesHeader0="Modules Information"
-Count mtDialog_CPUCaption=1
-mtDialog_CPUCaption0="CPU"
-Count mtDialog_CPUHeader=1
-mtDialog_CPUHeader0="CPU Information"
-Count mtDialog_CustomDataCaption=1
-mtDialog_CustomDataCaption0="Other"
-Count mtDialog_CustomDataHeader=1
-mtDialog_CustomDataHeader0="Other Information"
-Count mtDialog_OKButtonCaption=1
-mtDialog_OKButtonCaption0="%26OK"
-Count mtDialog_TerminateButtonCaption=1
-mtDialog_TerminateButtonCaption0="%26Terminate"
-Count mtDialog_RestartButtonCaption=1
-mtDialog_RestartButtonCaption0="%26Restart"
-Count mtDialog_DetailsButtonCaption=1
-mtDialog_DetailsButtonCaption0="%26Details"
-Count mtDialog_SendMessage=1
-mtDialog_SendMessage0="%26Send this error via Internet"
-Count mtDialog_ScreenshotMessage=1
-mtDialog_ScreenshotMessage0="%26Attach a Screenshot image"
-Count mtDialog_CopyMessage=1
-mtDialog_CopyMessage0="%26Copy to Clipboard"
-Count mtDialog_SupportMessage=1
-mtDialog_SupportMessage0="Go to the Support Page"
-Count mtLog_AppHeader=1
-mtLog_AppHeader0="Application"
-Count mtLog_AppStartDate=1
-mtLog_AppStartDate0="Start Date"
-Count mtLog_AppName=1
-mtLog_AppName0="Name/Description"
-Count mtLog_AppVersionNumber=1
-mtLog_AppVersionNumber0="Version Number"
-Count mtLog_AppParameters=1
-mtLog_AppParameters0="Parameters"
-Count mtLog_AppCompilationDate=1
-mtLog_AppCompilationDate0="Compilation Date"
-Count mtLog_ExcHeader=1
-mtLog_ExcHeader0="Exception"
-Count mtLog_ExcDate=1
-mtLog_ExcDate0="Date"
-Count mtLog_ExcAddress=1
-mtLog_ExcAddress0="Address"
-Count mtLog_ExcModule=1
-mtLog_ExcModule0="Module"
-Count mtLog_ExcType=1
-mtLog_ExcType0="Type"
-Count mtLog_ExcMessage=1
-mtLog_ExcMessage0="Message"
-Count mtLog_ActCtrlsHeader=1
-mtLog_ActCtrlsHeader0="Active Controls"
-Count mtLog_ActCtrlsFormClass=1
-mtLog_ActCtrlsFormClass0="Form Class"
-Count mtLog_ActCtrlsFormText=1
-mtLog_ActCtrlsFormText0="Form Text"
-Count mtLog_ActCtrlsControlClass=1
-mtLog_ActCtrlsControlClass0="Control Class"
-Count mtLog_ActCtrlsControlText=1
-mtLog_ActCtrlsControlText0="Control Text"
-Count mtLog_CmpHeader=1
-mtLog_CmpHeader0="Computer"
-Count mtLog_CmpName=1
-mtLog_CmpName0="Name"
-Count mtLog_CmpUser=1
-mtLog_CmpUser0="User"
-Count mtLog_CmpTotalMemory=1
-mtLog_CmpTotalMemory0="Total Memory"
-Count mtLog_CmpFreeMemory=1
-mtLog_CmpFreeMemory0="Free Memory"
-Count mtLog_CmpTotalDisk=1
-mtLog_CmpTotalDisk0="Total Disk"
-Count mtLog_CmpFreeDisk=1
-mtLog_CmpFreeDisk0="Free Disk"
-Count mtLog_CmpSystemUpTime=1
-mtLog_CmpSystemUpTime0="System Up Time"
-Count mtLog_CmpProcessor=1
-mtLog_CmpProcessor0="Processor"
-Count mtLog_CmpDisplayMode=1
-mtLog_CmpDisplayMode0="Display Mode"
-Count mtLog_OSHeader=1
-mtLog_OSHeader0="Operating System"
-Count mtLog_OSType=1
-mtLog_OSType0="Type"
-Count mtLog_OSBuildN=1
-mtLog_OSBuildN0="Build #"
-Count mtLog_OSUpdate=1
-mtLog_OSUpdate0="Update"
-Count mtLog_OSLanguage=1
-mtLog_OSLanguage0="Language"
-Count mtLog_NetHeader=1
-mtLog_NetHeader0="Network"
-Count mtLog_NetIP=1
-mtLog_NetIP0="IP Address"
-Count mtLog_NetSubmask=1
-mtLog_NetSubmask0="Submask"
-Count mtLog_NetGateway=1
-mtLog_NetGateway0="Gateway"
-Count mtLog_NetDNS1=1
-mtLog_NetDNS10="DNS 1"
-Count mtLog_NetDNS2=1
-mtLog_NetDNS20="DNS 2"
-Count mtLog_NetDHCP=1
-mtLog_NetDHCP0="DHCP"
-Count mtLog_CustInfoHeader=1
-mtLog_CustInfoHeader0="Custom Information"
-Count mtCallStack_Address=1
-mtCallStack_Address0="Address"
-Count mtCallStack_Name=1
-mtCallStack_Name0="Module"
-Count mtCallStack_Unit=1
-mtCallStack_Unit0="Unit"
-Count mtCallStack_Class=1
-mtCallStack_Class0="Class"
-Count mtCallStack_Procedure=1
-mtCallStack_Procedure0="Procedure/Method"
-Count mtCallStack_Line=1
-mtCallStack_Line0="Line"
-Count mtCallStack_MainThread=1
-mtCallStack_MainThread0="Main"
-Count mtCallStack_ExceptionThread=1
-mtCallStack_ExceptionThread0="Exception Thread"
-Count mtCallStack_RunningThread=1
-mtCallStack_RunningThread0="Running Thread"
-Count mtCallStack_CallingThread=1
-mtCallStack_CallingThread0="Calling Thread"
-Count mtCallStack_ThreadID=1
-mtCallStack_ThreadID0="ID"
-Count mtCallStack_ThreadPriority=1
-mtCallStack_ThreadPriority0="Priority"
-Count mtCallStack_ThreadClass=1
-mtCallStack_ThreadClass0="Class"
-Count mtSendDialog_Caption=1
-mtSendDialog_Caption0="Send."
-Count mtSendDialog_Message=1
-mtSendDialog_Message0="Message"
-Count mtSendDialog_Resolving=1
-mtSendDialog_Resolving0="Resolving DNS..."
-Count mtSendDialog_Connecting=1
-mtSendDialog_Connecting0="Connecting with server..."
-Count mtSendDialog_Connected=1
-mtSendDialog_Connected0="Connected with server."
-Count mtSendDialog_Sending=1
-mtSendDialog_Sending0="Sending message..."
-Count mtReproduceDialog_Caption=1
-mtReproduceDialog_Caption0="Request"
-Count mtReproduceDialog_Request=1
-mtReproduceDialog_Request0="Please describe the steps to reproduce the error:"
-Count mtReproduceDialog_OKButtonCaption=1
-mtReproduceDialog_OKButtonCaption0="%26OK"
-Count mtModules_Handle=1
-mtModules_Handle0="Handle"
-Count mtModules_Name=1
-mtModules_Name0="Name"
-Count mtModules_Description=1
-mtModules_Description0="Description"
-Count mtModules_Version=1
-mtModules_Version0="Version"
-Count mtModules_Size=1
-mtModules_Size0="Size"
-Count mtModules_LastModified=1
-mtModules_LastModified0="Modified"
-Count mtModules_Path=1
-mtModules_Path0="Path"
-Count mtCPU_Registers=1
-mtCPU_Registers0="Registers"
-Count mtCPU_Stack=1
-mtCPU_Stack0="Stack"
-Count mtCPU_MemoryDump=1
-mtCPU_MemoryDump0="Memory Dump"
-Count mtSend_SuccessMsg=1
-mtSend_SuccessMsg0="The message was sent successfully."
-Count mtSend_FailureMsg=1
-mtSend_FailureMsg0="Sorry, sending the message didn't work."
-ProxyURL=
-ProxyUser=
-ProxyPassword=
-ProxyPort=8080
-TrakerUser=
-TrakerPassword=
-TrakerAssignTo=
-TrakerProject=
-TrakerCategory=
-TrakerTrialID=
-ZipPassword=
-PreBuildEvent=
-PostSuccessfulBuildEvent=
-PostFailureBuildEvent=
-ExceptionDialogType=2
-loSaveModulesAndProcessesSections=1
-loSaveAssemblerAndCPUSections=1
-soAppUpTime=1
-soExcModuleName=1
-soExcModuleVersion=1
-soExcID=1
-soExcCount=1
-soExcStatus=1
-soExcNote=1
-soUserID=1
-soUserName=1
-soUserEmail=1
-soUserPrivileges=1
-soUserCompany=1
-soCmpDisplayDPI=1
-soCmpVideoCard=1
-soCmpPrinter=1
-soOSCharset=1
-soCustomData=1
-sndAddComputerNameInFileName=0
-edoSendErrorReportChecked=1
-edoShowSendErrorReportOption=1
-edoShowAttachScreenshotOption=1
-edoShowCustomButton=0
-csoDoNotStoreProcNames=0
-boHandleSafeCallExceptions=1
-boCallRTLExceptionEvent=0
-boCatchHandledExceptions=0
-loCatchLeaks=0
-loGroupsSonLeaks=1
-loHideBorlandLeaks=1
-loFreeAllLeaks=1
-loCatchLeaksExceptions=1
-cfoReduceFileSize=1
-cfoCheckFileCorruption=0
-Count mtErrorMsgCaption=1
-mtErrorMsgCaption0="Error."
-Count mtDialog_ProcessesCaption=1
-mtDialog_ProcessesCaption0="Processes"
-Count mtDialog_ProcessesHeader=1
-mtDialog_ProcessesHeader0="Processes Information"
-Count mtDialog_AsmCaption=1
-mtDialog_AsmCaption0="Assembler"
-Count mtDialog_AsmHeader=1
-mtDialog_AsmHeader0="Assembler Information"
-Count mtDialog_CustomButtonCaption=1
-mtDialog_CustomButtonCaption0="%26Help"
-Count mtMSDialog_ErrorMsgCaption=1
-mtMSDialog_ErrorMsgCaption0="The application has encountered a problem. We are sorry for the inconvenience."
-Count mtMSDialog_RestartCaption=1
-mtMSDialog_RestartCaption0="Restart application."
-Count mtMSDialog_TerminateCaption=1
-mtMSDialog_TerminateCaption0="Terminate application."
-Count mtMSDialog_PleaseCaption=1
-mtMSDialog_PleaseCaption0="Please tell us about this problem."
-Count mtMSDialog_DescriptionCaption=1
-mtMSDialog_DescriptionCaption0="We have created an error report that you can send to us. We will treat this report as confidential and anonymous."
-Count mtMSDialog_SeeDetailsCaption=1
-mtMSDialog_SeeDetailsCaption0="To see what data the error report contains,"
-Count mtMSDialog_SeeClickCaption=1
-mtMSDialog_SeeClickCaption0="click here."
-Count mtMSDialog_HowToReproduceCaption=1
-mtMSDialog_HowToReproduceCaption0="What were you doing when the problem happended (optional)?"
-Count mtMSDialog_EmailCaption=1
-mtMSDialog_EmailCaption0="Email address (optional):"
-Count mtMSDialog_SendButtonCaption=1
-mtMSDialog_SendButtonCaption0="%26Send Error Report"
-Count mtMSDialog_NoSendButtonCaption=1
-mtMSDialog_NoSendButtonCaption0="%26Don't Send"
-Count mtLog_AppUpTime=1
-mtLog_AppUpTime0="Up Time"
-Count mtLog_ExcModuleName=1
-mtLog_ExcModuleName0="Module Name"
-Count mtLog_ExcModuleVersion=1
-mtLog_ExcModuleVersion0="Module Version"
-Count mtLog_ExcID=1
-mtLog_ExcID0="ID"
-Count mtLog_ExcCount=1
-mtLog_ExcCount0="Count"
-Count mtLog_ExcStatus=1
-mtLog_ExcStatus0="Status"
-Count mtLog_ExcNote=1
-mtLog_ExcNote0="Note"
-Count mtLog_UserHeader=1
-mtLog_UserHeader0="User"
-Count mtLog_UserID=1
-mtLog_UserID0="ID"
-Count mtLog_UserName=1
-mtLog_UserName0="Name"
-Count mtLog_UserEmail=1
-mtLog_UserEmail0="Email"
-Count mtLog_UserCompany=1
-mtLog_UserCompany0="Company"
-Count mtLog_UserPrivileges=1
-mtLog_UserPrivileges0="Privileges"
-Count mtLog_CmpDisplayDPI=1
-mtLog_CmpDisplayDPI0="Display DPI"
-Count mtLog_CmpVideoCard=1
-mtLog_CmpVideoCard0="Video Card"
-Count mtLog_CmpPrinter=1
-mtLog_CmpPrinter0="Printer"
-Count mtLog_OSCharset=1
-mtLog_OSCharset0="Charset"
-Count mtCallStack_LeakCaption=1
-mtCallStack_LeakCaption0="Memory Leak"
-Count mtCallStack_LeakData=1
-mtCallStack_LeakData0="Data"
-Count mtCallStack_LeakType=1
-mtCallStack_LeakType0="Type"
-Count mtCallStack_LeakSize=1
-mtCallStack_LeakSize0="Total size"
-Count mtCallStack_LeakCount=1
-mtCallStack_LeakCount0="Count"
-Count mtSendDialog_Login=1
-mtSendDialog_Login0="Login..."
-Count mtSendDialog_Sent=1
-mtSendDialog_Sent0="Message sent."
-Count mtSendDialog_SelectProject=1
-mtSendDialog_SelectProject0="Select project..."
-Count mtSendDialog_Searching=1
-mtSendDialog_Searching0="Searching..."
-Count mtSendDialog_Modifying=1
-mtSendDialog_Modifying0="Modifying..."
-Count mtSendDialog_Disconnecting=1
-mtSendDialog_Disconnecting0="Disconnecting..."
-Count mtSendDialog_Disconnected=1
-mtSendDialog_Disconnected0="Disconnected."
-Count mtProcesses_ID=1
-mtProcesses_ID0="ID"
-Count mtProcesses_Name=1
-mtProcesses_Name0="Name"
-Count mtProcesses_Description=1
-mtProcesses_Description0="Description"
-Count mtProcesses_Version=1
-mtProcesses_Version0="Version"
-Count mtProcesses_Memory=1
-mtProcesses_Memory0="Memory"
-Count mtProcesses_Priority=1
-mtProcesses_Priority0="Priority"
-Count mtProcesses_Threads=1
-mtProcesses_Threads0="Threads"
-Count mtProcesses_Path=1
-mtProcesses_Path0="Path"
-Count mtSend_BugClosedMsg=2
-mtSend_BugClosedMsg0="These BUG is just closed."
-mtSend_BugClosedMsg1="Contact the program support to obtain an update."
-Count mtSend_UnknownErrorMsg=1
-mtSend_UnknownErrorMsg0="Unknown error."
-Count mtSend_InvalidLoginMsg=1
-mtSend_InvalidLoginMsg0="Invalid login request."
-Count mtSend_InvalidSearchMsg=1
-mtSend_InvalidSearchMsg0="Invalid search request."
-Count mtSend_InvalidSelectionMsg=1
-mtSend_InvalidSelectionMsg0="Invalid selection request."
-Count mtSend_InvalidInsertMsg=1
-mtSend_InvalidInsertMsg0="Invalid insert request."
-Count mtSend_InvalidModifyMsg=1
-mtSend_InvalidModifyMsg0="Invalid modify request."
-Count mtFileCrackedMsg=2
-mtFileCrackedMsg0="This file is cracked."
-mtFileCrackedMsg1="The application will be closed."
-Count mtException_LeakMultiFree=1
-mtException_LeakMultiFree0="Multi Free memory leak."
-Count mtException_LeakMemoryOverrun=1
-mtException_LeakMemoryOverrun0="Memory Overrun leak."
-Count mtException_AntiFreeze=1
-mtException_AntiFreeze0="The application seems to be frozen."
-Count mtInvalidEmailMsg=1
-mtInvalidEmailMsg0="Invalid email."
-TextsCollection=English
-EurekaLog Last Line -->
 </BorlandProject>
diff --git a/Source/Cliente/FactuGES.dpr b/Source/Cliente/FactuGES.dpr
index 6eaa1e4d..2fc4ce63 100644
--- a/Source/Cliente/FactuGES.dpr
+++ b/Source/Cliente/FactuGES.dpr
@@ -10,13 +10,11 @@ uses
   uMenuUtils in 'Utiles\uMenuUtils.pas',
   uSplash in 'uSplash.pas' {SplashScreen},
   uAcercaDe in 'uAcercaDe.pas',
-  udxNavPaneController in 'udxNavPaneController.pas',
   uNavPaneUtils in 'Utiles\uNavPaneUtils.pas',
   uMainMenuController in 'uMainMenuController.pas',
   uClienteUtils in 'Utiles\uClienteUtils.pas',
   uBootStrap in 'uBootStrap.pas',
   VCLFlickerReduce in 'Utiles\VCLFlickerReduce.pas',
-  uPantallaPrincipal2 in 'uPantallaPrincipal2.pas' {fPantallaPrincipal2},
   uNavPaneController in 'uNavPaneController.pas';
 
 {$R *.res}
diff --git a/Source/Cliente/FactuGES.dproj b/Source/Cliente/FactuGES.dproj
index a30c7948..cdffa8da 100644
--- a/Source/Cliente/FactuGES.dproj
+++ b/Source/Cliente/FactuGES.dproj
@@ -57,15 +57,6 @@
       
       
       
-      
-      
-      
-      
-      
-      
-      
-      
-      
       <Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\DataAbstract_SQLiteDriver_D11.bpl">RemObjects Data Abstract - SQLite Driver</Excluded_Packages>
       <Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
       <Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
@@ -78,15 +69,11 @@
     </DelphiCompile>
     <DCCReference Include="uAcercaDe.pas" />
     <DCCReference Include="uBootStrap.pas" />
-    <DCCReference Include="udxNavPaneController.pas" />
     <DCCReference Include="uMainMenuController.pas" />
     <DCCReference Include="uNavPaneController.pas" />
     <DCCReference Include="uPantallaPrincipal.pas">
       <Form>fPantallaPrincipal</Form>
     </DCCReference>
-    <DCCReference Include="uPantallaPrincipal2.pas">
-      <Form>fPantallaPrincipal2</Form>
-    </DCCReference>
     <DCCReference Include="uSplash.pas">
       <Form>SplashScreen</Form>
     </DCCReference>
@@ -97,6 +84,7 @@
     <None Include="..\FactuGES.inc" />
   </ItemGroup>
 </Project>
+
 <!-- EurekaLog First Line
 [Exception Log]
 EurekaLog Version=6006
@@ -105,14 +93,14 @@ Activate Handle=1
 Save Log File=1
 Foreground Tab=0
 Freeze Activate=0
-Freeze Timeout=1
+Freeze Timeout=60
 SMTP From=eurekalog@email.com
 SMTP Host=
 SMTP Port=25
 SMTP UserID=
 SMTP Password=
 Append to Log=0
-TerminateBtn Operation=1
+TerminateBtn Operation=2
 Errors Number=32
 Errors Terminate=3
 Email Address=
@@ -139,7 +127,7 @@ HTMLLine11="      %3C/tr%3E"
 HTMLLine12="    %3C/table%3E"
 HTMLLine13="  %3C/body%3E"
 HTMLLine14="%3C/html%3E"
-AutoCrashOperation=1
+AutoCrashOperation=2
 AutoCrashNumber=10
 AutoCrashMinutes=1
 WebURL=
@@ -161,7 +149,7 @@ ZipPassword=
 PreBuildEvent=
 PostSuccessfulBuildEvent=
 PostFailureBuildEvent=
-ExceptionDialogType=3
+ExceptionDialogType=2
 Count=0
 EMail Message Line Count=0
 loNoDuplicateErrors=0
@@ -222,7 +210,7 @@ sndShowSendDialog=1
 sndShowSuccessFailureMsg=0
 sndSendEntireLog=0
 sndSendXMLLogCopy=0
-sndSendScreenshot=0
+sndSendScreenshot=1
 sndUseOnlyActiveWindow=0
 sndSendLastHTMLPage=1
 sndSendInSeparatedThread=0
@@ -234,7 +222,7 @@ edoShowCopyToClipOption=1
 edoShowDetailsButton=1
 edoShowInDetailedMode=0
 edoShowInTopMostMode=0
-edoUseEurekaLogLookAndFeel=1
+edoUseEurekaLogLookAndFeel=0
 edoShowSendErrorReportOption=1
 edoShowAttachScreenshotOption=1
 edoShowCustomButton=0
@@ -252,9 +240,9 @@ boSaveCompressedCopyInCaseOfError=0
 boHandleSafeCallExceptions=1
 boCallRTLExceptionEvent=0
 boCatchHandledExceptions=0
-loCatchLeaks=1
+loCatchLeaks=0
 loGroupsSonLeaks=1
-loHideBorlandLeaks=0
+loHideBorlandLeaks=1
 loFreeAllLeaks=1
 loCatchLeaksExceptions=1
 cfoReduceFileSize=1
@@ -578,5 +566,5 @@ Count mtException_AntiFreeze=1
 mtException_AntiFreeze0="The application seems to be frozen."
 Count mtInvalidEmailMsg=1
 mtInvalidEmailMsg0="Invalid email."
-TextsCollection=
+TextsCollection=English
 EurekaLog Last Line -->
diff --git a/Source/GUIBase/GUIBase.res b/Source/GUIBase/GUIBase.res
index 1641339fcc482e7e3492d1b45813a86619622c33..8b251f312bcccec5485024f6fe8d80e1cdf25746 100644
GIT binary patch
delta 11
ScmeBCZD5|Duvteife`=|>;pCc

literal 4748
zcmbW5&ub)A5XUPdpe&2#;C*uNAUVhgd+&(4um@dnom`vXF9g}ZuHJ;se=<3UNdFJg
zbCw+UD9j$byGIXV`~6hC>h4S?F|k9X-j90q{Z_qtZ<;nUJCO8!h?<w4U-ol;S2jC7
zx4(byej2@_#)0HWvg0i^wC4Xli+W*aXJ^(njceK|Kb@c3qFNX>p${kR>3GhM`oH*q
zk=UsjOCIgA_4!`B+Gb&`I84R)bT4dy-BQV<-SyFz?R8ILEQ(+JB$u{sEXE@j@B*7W
zT;iZH#|OJ<&DO$RCkM6VbK3(B(k{nbdv1lpc;E$xz9as|v3uE1V{hw2w~g3eD0an7
z{BT%G%irdMe*|oDJmgvJ<ltI;x5J<Oc>aA2`9B<Z5Toyra?r{a4$fnJHGXo6Pmcq8
z{JGCD500t1h4|yI?-f&xoj9;YT&Ch&JLO*X#NC3sCI0Xmc<f_vh`jn-1E!?th$%QM
znzGM|)$vl3f7;nE+9qR}|A?C$H3K&BFdq9?uxrIqHIne#5?8G@da2ybWLGKA686M2
z*LJMMMk4<U`dzFC9}HrSxLfOGll{P#??xir)$c2}C;ql+y-&Wa(LP{PgPk1E1@{uR
zIMCNz;u9;r(axhQvEx%?i#p<Vn=Z!SK%f10?4_`0@RY8lXRM3(t(nFSzJ$4kJr6&x
ze)~B%biu*TY$HDstHD=|UGxJceYiUQQa0Gu(p3og@%ZJ><6Xi*?M~Q;)@Sbfwf3uf
zVaWkbU<NjR3%=~AdoZbkXp`f@b0%GBT^$^V5e(n|#O(?P)hBbF)4n%2cw6U#adPM!
zz(!`V|Bfl{aH0)Y&w;SK7R4<z{p;Gwz1D%l86L3ZFZQ&=pB$<&esXT|OZ?=AGaWoe
z{>jU=;sL{BlYemIZXv%qZ{SZw{-TCU+;!nH6KDDIJumU+9{E0zXW4>7T)y|>$DQlv
zRJe?TjSp{c!DqeayAnSMTtZZT;>LN7J0Rls+5m@q)MbyB*eL%Eu@(+$Cw}Pd@q7N|
z%Q0*AHpCP^b9v`@jx-l_FD>khpW2W8(OU2&V5TrnoAY-m_hlcV?zq3;7{2gF{J#Hc
z6R+o~mVenX?>@W0@_DVzyOFs(5464CY{!q9ChoF#_*eXi@4gFuV8?vhl=_w5$iKL0
zEV0nMBcN08xtRmsgJrqjh@s#|{?*ssnsG)mH*wa6{efF0JFWHok@kA5%b661{B38=
zCcgJ|*ZFTpV$8<-&+AWpa)Q8*`wL&hMeNQ^v6I7$HSdLZhZ^&+6<@Uw_Zsml9^v3W
zVvPDBKHh;i=RU4J_ta3E;)M<P+=2X7;VbzliQZ=IHV#+fr#{!(ukt%UJMS8=332qg
z7jD)rSbpCW+^j*cd6LUEe8#9n&v!NEJM(@?SHvB$=h@|)fjw|&qD?NQ5A&R>n>Y+L
zKLZ0UQ+*km9FO-b?U4gmn-62iwzH6&*duKGo~aUV)bYDla8wWZ9+^7p-F<8lP@i!m
z@vhbD_${F}h>^T;C(?(b*OJDk?{dEXB?nuehoON3HAb!7Mr7-ls!84-5V-jJu<OVP
zzHjp+hnwo*3NQE$JTA(agu~silV5T`du+GJgWGi_7mAy`Nk8fLt~%GF$;XXcE-ri?
zyIglyyzA`K-);4Eem2MZm07RBza@W3UP)d`Rz=RFk-I);`s{$L%yyBNX0OTjo5Gk0
zs}g44uXg*l%xo^{`#0=kd*2?}Cz22Bv2;Gu?;3o~(D#gk1OKYQSCAb$(&vu@_pvWO
z>gbu<_$}mU=Yd9!?TOX;|B-#B)+0x#9q*yqJiqS!`49d=7ztk$O+9=1i;?K_|J<8T
z?0b7=-`Z3A#vV$4XJ5(lQ~TOZHUFdA%oWvK5zg&_IKXIbughQBA8XAsd#=@|TFLXC
zy(^m((;DnQmDQ<zX+PK(Lfu@ox#mOnbZjSDl}IBqv$qwK+2@))5$ba>Katmw!@c`|
G?EMQ&4NnpP

diff --git a/Source/Servidor/FactuGES_Server.RES b/Source/Servidor/FactuGES_Server.RES
index 3604f823830d9d8fe046072920355205aae3fe4e..7ac5e1c74ea51f319b816163d6a58dd4b55d2b3d 100644
GIT binary patch
delta 78
zcmdn7jd24I-HBi{nS3`w9!UO;h-REJIWkh2v0!s;BsU{-3WL(*?kHK|EQV5sRE9Dj
eE@seSP+%}(FqwQXN}b(|!HU6<!D8~qD0cuSsTZLD

delta 86
zcmdn6jd8~|#tnBO7;PrsjgSYDe<Pw9XHAZbRAwyOTpP*F$ehKXI=MSaRx+0%li?*p
q5koRVK0^*eDnl`Y4ub-N5rgsM-BIeC<_uO01`MVQ43l3*xdQ<Hvl(#!

diff --git a/Source/Servidor/FactuGES_Server.rc b/Source/Servidor/FactuGES_Server.rc
index 418218c3..df9f0e4c 100644
--- a/Source/Servidor/FactuGES_Server.rc
+++ b/Source/Servidor/FactuGES_Server.rc
@@ -16,7 +16,7 @@ BEGIN
               VALUE "FileVersion", "2.2.3.0\0"
               VALUE "ProductName", "FactuGES (Servidor)\0"
               VALUE "ProductVersion", "2.2.3.0\0"
-              VALUE "CompileDate", "miércoles, 23 de julio de 2008 17:05\0"
+              VALUE "CompileDate", "jueves, 24 de julio de 2008 16:18\0"
          END
     END
     BLOCK "VarFileInfo"