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;