From c9d176f674e91ada43b76429d28ac22453f5cf36 Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Mon, 4 Aug 2008 11:41:36 +0000
Subject: [PATCH] =?UTF-8?q?Grid=20->=20Guardar=20la=20configuraci=C3=B3n?=
 =?UTF-8?q?=20en=20un=20fichero=20XML=20en=20vez=20del=20registro=20de=20W?=
 =?UTF-8?q?indows=20(II)?=
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.Tecsitel_FactuGES2/trunk@495 0c75b7a4-871f-7646-8a2f-f78d34cc349f
---
 Source/GUIBase/uEditorGridBase.dfm |  2 --
 Source/GUIBase/uEditorGridBase.pas | 16 ----------------
 Source/GUIBase/uViewGridBase.pas   |  3 ++-
 3 files changed, 2 insertions(+), 19 deletions(-)

diff --git a/Source/GUIBase/uEditorGridBase.dfm b/Source/GUIBase/uEditorGridBase.dfm
index 6fe919ea..9b596e4c 100644
--- a/Source/GUIBase/uEditorGridBase.dfm
+++ b/Source/GUIBase/uEditorGridBase.dfm
@@ -1516,8 +1516,6 @@ inherited fEditorGridBase: TfEditorGridBase
     Bitmap = {}
   end
   inherited JvFormStorage: TJvFormStorage
-    OnSavePlacement = JvFormStorageSavePlacement
-    OnRestorePlacement = JvFormStorageRestorePlacement
     Left = 400
     Top = 160
   end
diff --git a/Source/GUIBase/uEditorGridBase.pas b/Source/GUIBase/uEditorGridBase.pas
index 61463beb..852f74f2 100644
--- a/Source/GUIBase/uEditorGridBase.pas
+++ b/Source/GUIBase/uEditorGridBase.pas
@@ -61,8 +61,6 @@ type
     procedure FormShow(Sender: TObject); 
     procedure actQuitarFiltroExecute(Sender: TObject);
     procedure actDuplicarUpdate(Sender: TObject);
-    procedure JvFormStorageSavePlacement(Sender: TObject);
-    procedure JvFormStorageRestorePlacement(Sender: TObject);
     procedure actModificarUpdate(Sender: TObject);
     procedure actEliminarUpdate(Sender: TObject);
     procedure actNuevoUpdate(Sender: TObject);
@@ -279,13 +277,6 @@ begin
        (Sender as TAction).Enabled := (ViewGrid.NumSeleccionados = 1);
 end;
 
-procedure TfEditorGridBase.JvFormStorageSavePlacement(Sender: TObject);
-begin
-  inherited;
-  if Assigned(ViewGrid) then
-    ViewGrid.StoreToRegistry(JvAppRegistryStorage.Root);
-end;
-
 procedure TfEditorGridBase.PrevisualizarInterno;
 begin
   inherited;
@@ -312,13 +303,6 @@ begin
   end;
 end;
 
-procedure TfEditorGridBase.JvFormStorageRestorePlacement(Sender: TObject);
-begin
-  inherited;
-  if Assigned(ViewGrid) then
-    ViewGrid.RestoreFromRegistry(JvAppRegistryStorage.Root);
-end;
-
 initialization
   RegisterClass(TfEditorGridBase);
 
diff --git a/Source/GUIBase/uViewGridBase.pas b/Source/GUIBase/uViewGridBase.pas
index 0ff62fac..0efb9652 100644
--- a/Source/GUIBase/uViewGridBase.pas
+++ b/Source/GUIBase/uViewGridBase.pas
@@ -180,7 +180,8 @@ procedure Register;
 implementation
 
 uses
-  CCReg, uDMBase, cxGridBandedTableView, uDBSelectionListUtils;
+  CCReg, uDMBase, cxGridBandedTableView, uDBSelectionListUtils,
+  uSistemaFunc, SHFolder, uAppInfoUtils;
 
 {$R *.dfm}