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);