From aaf8d26026289525bb5054c5158b6cea368d63ac Mon Sep 17 00:00:00 2001
From: david <darranz@rodax-software.com>
Date: Mon, 10 Nov 2008 14:52:10 +0000
Subject: [PATCH] Documentos relacionados -> corregido error con herencia de
 interfaces.

git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@748 0c75b7a4-871f-7646-8a2f-f78d34cc349f
---
 .../Contactos/Controller/View/uIEditorGruposCliente.pas     | 4 ++--
 .../Contactos/Controller/View/uIEditorGruposEmpleado.pas    | 4 ++--
 .../Contactos/Controller/View/uIEditorGruposProveedor.pas   | 4 ++--
 .../Fabricantes/Controller/View/uIEditorFabricantes.pas     | 6 +++---
 .../Modulos/Familias/Controller/View/uIEditorFamilias.pas   | 4 ++--
 .../Controller/View/uIEditorUnidadesMedida.pas              | 4 ++--
 6 files changed, 13 insertions(+), 13 deletions(-)

diff --git a/Source/Modulos/Contactos/Controller/View/uIEditorGruposCliente.pas b/Source/Modulos/Contactos/Controller/View/uIEditorGruposCliente.pas
index b45bde1a..0818b2e4 100644
--- a/Source/Modulos/Contactos/Controller/View/uIEditorGruposCliente.pas
+++ b/Source/Modulos/Contactos/Controller/View/uIEditorGruposCliente.pas
@@ -3,10 +3,10 @@ unit uIEditorGruposCliente;
 interface
 
 uses
-  uEditorDBBase, uBizGruposCliente, uGruposClienteController;
+  uEditorDBBase, uBizGruposCliente, uGruposClienteController, uGUIBase;
 
 type
-  IEditorGruposCliente = interface
+  IEditorGruposCliente = interface(ICustomEditor)
   ['{7BF79417-A95C-41F3-96DE-707F2D6F29E3}']
     function ShowModal : Integer;
     procedure Show;
diff --git a/Source/Modulos/Contactos/Controller/View/uIEditorGruposEmpleado.pas b/Source/Modulos/Contactos/Controller/View/uIEditorGruposEmpleado.pas
index a6c620f5..07ec7114 100644
--- a/Source/Modulos/Contactos/Controller/View/uIEditorGruposEmpleado.pas
+++ b/Source/Modulos/Contactos/Controller/View/uIEditorGruposEmpleado.pas
@@ -3,10 +3,10 @@ unit uIEditorGruposEmpleado;
 interface
 
 uses
-  uEditorDBBase, uBizGruposEmpleado, uGruposEmpleadoController;
+  uEditorDBBase, uBizGruposEmpleado, uGruposEmpleadoController, uGUIBase;
 
 type
-  IEditorGruposEmpleado = interface
+  IEditorGruposEmpleado = interface(ICustomEditor)
   ['{02981B41-9986-48D8-927C-A08A45168EDE}']
     function ShowModal : Integer;
     procedure Show;
diff --git a/Source/Modulos/Contactos/Controller/View/uIEditorGruposProveedor.pas b/Source/Modulos/Contactos/Controller/View/uIEditorGruposProveedor.pas
index e78359c0..2250865b 100644
--- a/Source/Modulos/Contactos/Controller/View/uIEditorGruposProveedor.pas
+++ b/Source/Modulos/Contactos/Controller/View/uIEditorGruposProveedor.pas
@@ -3,10 +3,10 @@ unit uIEditorGruposProveedor;
 interface
 
 uses
-  uEditorDBBase, uBizGruposProveedor, uGruposProveedorController;
+  uEditorDBBase, uBizGruposProveedor, uGruposProveedorController, uGUIBase;
 
 type
-  IEditorGruposProveedor = interface
+  IEditorGruposProveedor = interface(ICustomEditor)
   ['{A593BC54-0A28-446E-A6B7-E925D7C4B82C}']
     function ShowModal : Integer;
     procedure Show;
diff --git a/Source/Modulos/Fabricantes/Controller/View/uIEditorFabricantes.pas b/Source/Modulos/Fabricantes/Controller/View/uIEditorFabricantes.pas
index 0ab34410..4dcbf65e 100644
--- a/Source/Modulos/Fabricantes/Controller/View/uIEditorFabricantes.pas
+++ b/Source/Modulos/Fabricantes/Controller/View/uIEditorFabricantes.pas
@@ -3,11 +3,11 @@ unit uIEditorFabricantes;
 interface
 
 uses
-  uEditorDBBase, uBizFabricantes, uFabricantesController;
+  uEditorDBBase, uBizFabricantes, uFabricantesController, uGUIBase;
 
 type
-  IEditorFabricantes = interface
-  ['{1DD6E573-CCD8-4443-9AC3-378CF63EB639}']
+  IEditorFabricantes = interface(ICustomEditor)
+  ['{BCA44D6E-18A9-4F38-9D52-9A2F6C721DA3}']
     function GetFabricantes: IBizFabricante;
     procedure SetFabricantes(const Value: IBizFabricante);
     property Fabricantes: IBizFabricante read GetFabricantes write SetFabricantes;
diff --git a/Source/Modulos/Familias/Controller/View/uIEditorFamilias.pas b/Source/Modulos/Familias/Controller/View/uIEditorFamilias.pas
index b442c6ce..3435d2ea 100644
--- a/Source/Modulos/Familias/Controller/View/uIEditorFamilias.pas
+++ b/Source/Modulos/Familias/Controller/View/uIEditorFamilias.pas
@@ -3,10 +3,10 @@ unit uIEditorFamilias;
 interface
 
 uses
-  uEditorDBBase, uBizFamilias, uFamiliasController;
+  uEditorDBBase, uBizFamilias, uFamiliasController, uGUIBase;
 
 type
-  IEditorFamilias = interface
+  IEditorFamilias = interface(ICustomEditor)
   ['{28CD8E74-C3D5-4862-A8F9-CF0EE3E79FED}']
     function GetFamilias: IBizFamilia;
     procedure SetFamilias(const Value: IBizFamilia);
diff --git a/Source/Modulos/Unidades de medida/Controller/View/uIEditorUnidadesMedida.pas b/Source/Modulos/Unidades de medida/Controller/View/uIEditorUnidadesMedida.pas
index c2a98a30..efcbe20b 100644
--- a/Source/Modulos/Unidades de medida/Controller/View/uIEditorUnidadesMedida.pas	
+++ b/Source/Modulos/Unidades de medida/Controller/View/uIEditorUnidadesMedida.pas	
@@ -3,10 +3,10 @@ unit uIEditorUnidadesMedida;
 interface
 
 uses
-  uEditorDBBase, uBizUnidadesMedida, uUnidadesMedidaController;
+  uEditorDBBase, uBizUnidadesMedida, uUnidadesMedidaController, uGUIBase;
 
 type
-  IEditorUnidadesMedida = interface
+  IEditorUnidadesMedida = interface(ICustomEditor)
   ['{5786FFF0-8036-4018-B77E-CE98F1FF1CD9}']
     function GetUnidadesMedida: IBizUnidadMedida;
     procedure SetUnidadesMedida(const Value: IBizUnidadMedida);