From 95fec021b33dc09cf15083b77cb44722873a7de9 Mon Sep 17 00:00:00 2001
From: roberto <rblanco@rodax-software.com>
Date: Wed, 20 Jan 2010 16:14:52 +0000
Subject: [PATCH] Arreglo de editor base ya que fallaba editor usuario y editor
 perfil

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@985 0c75b7a4-871f-7646-8a2f-f78d34cc349f
---
 Source/GUIBase/uEditorBase.pas | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/Source/GUIBase/uEditorBase.pas b/Source/GUIBase/uEditorBase.pas
index 1da68fc2..1e009cbd 100644
--- a/Source/GUIBase/uEditorBase.pas
+++ b/Source/GUIBase/uEditorBase.pas
@@ -127,6 +127,8 @@ type
     procedure actEliminarUpdate(Sender: TObject);
     procedure actGuardarCerrarUpdate(Sender: TObject);
     procedure actGuardarUpdate(Sender: TObject);
+    procedure FormShow(Sender: TObject);
+    
   protected
     FWindowCaption : String;
     FHeaderText : String;
@@ -154,7 +156,7 @@ type
     constructor Create(AOwner: TComponent); override;
     function ShowModal : Integer; override;
     procedure Show;
-    procedure FormShow(Sender: TObject);
+
   published
     property WindowCaption : String read GetWindowCaption write SetWindowCaption;
     property HeaderText : String read GetHeaderText write SetHeaderText;