From 49101ee5ae2c64423b3bf2ba6a29bd380edc0241 Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Tue, 31 Jan 2012 10:44:58 +0000
Subject: [PATCH] =?UTF-8?q?-=20Hay=20un=20problema=20con=20Windows=207=20x?=
 =?UTF-8?q?64=20y=20Delphi.=20Windows=20no=20informa=20bien=20de=20la=20co?=
 =?UTF-8?q?nfiguraci=C3=B3n=20regional.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES2/trunk@147 b2cfbe5a-eba1-4a0c-8b32-7feea0a119f2
---
 Source/Cliente/FactuGES.dpr | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/Source/Cliente/FactuGES.dpr b/Source/Cliente/FactuGES.dpr
index b105df3..77ab90e 100644
--- a/Source/Cliente/FactuGES.dpr
+++ b/Source/Cliente/FactuGES.dpr
@@ -20,6 +20,12 @@ uses
 {$R *.res}
 
 begin
+  {Hay un problema con Windows 7 x64 y Delphi.
+   Windows no informa bien de la configuración regional.}
+
+  SetThreadLocale(LOCALE_USER_DEFAULT);
+  GetFormatSettings;
+
   Application.Initialize;
 
   //ReportMemoryLeaksOnShutdown := True;