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
This commit is contained in:
parent
035449a2e7
commit
aaf8d26026
@ -3,10 +3,10 @@ unit uIEditorGruposCliente;
|
|||||||
interface
|
interface
|
||||||
|
|
||||||
uses
|
uses
|
||||||
uEditorDBBase, uBizGruposCliente, uGruposClienteController;
|
uEditorDBBase, uBizGruposCliente, uGruposClienteController, uGUIBase;
|
||||||
|
|
||||||
type
|
type
|
||||||
IEditorGruposCliente = interface
|
IEditorGruposCliente = interface(ICustomEditor)
|
||||||
['{7BF79417-A95C-41F3-96DE-707F2D6F29E3}']
|
['{7BF79417-A95C-41F3-96DE-707F2D6F29E3}']
|
||||||
function ShowModal : Integer;
|
function ShowModal : Integer;
|
||||||
procedure Show;
|
procedure Show;
|
||||||
|
|||||||
@ -3,10 +3,10 @@ unit uIEditorGruposEmpleado;
|
|||||||
interface
|
interface
|
||||||
|
|
||||||
uses
|
uses
|
||||||
uEditorDBBase, uBizGruposEmpleado, uGruposEmpleadoController;
|
uEditorDBBase, uBizGruposEmpleado, uGruposEmpleadoController, uGUIBase;
|
||||||
|
|
||||||
type
|
type
|
||||||
IEditorGruposEmpleado = interface
|
IEditorGruposEmpleado = interface(ICustomEditor)
|
||||||
['{02981B41-9986-48D8-927C-A08A45168EDE}']
|
['{02981B41-9986-48D8-927C-A08A45168EDE}']
|
||||||
function ShowModal : Integer;
|
function ShowModal : Integer;
|
||||||
procedure Show;
|
procedure Show;
|
||||||
|
|||||||
@ -3,10 +3,10 @@ unit uIEditorGruposProveedor;
|
|||||||
interface
|
interface
|
||||||
|
|
||||||
uses
|
uses
|
||||||
uEditorDBBase, uBizGruposProveedor, uGruposProveedorController;
|
uEditorDBBase, uBizGruposProveedor, uGruposProveedorController, uGUIBase;
|
||||||
|
|
||||||
type
|
type
|
||||||
IEditorGruposProveedor = interface
|
IEditorGruposProveedor = interface(ICustomEditor)
|
||||||
['{A593BC54-0A28-446E-A6B7-E925D7C4B82C}']
|
['{A593BC54-0A28-446E-A6B7-E925D7C4B82C}']
|
||||||
function ShowModal : Integer;
|
function ShowModal : Integer;
|
||||||
procedure Show;
|
procedure Show;
|
||||||
|
|||||||
@ -3,11 +3,11 @@ unit uIEditorFabricantes;
|
|||||||
interface
|
interface
|
||||||
|
|
||||||
uses
|
uses
|
||||||
uEditorDBBase, uBizFabricantes, uFabricantesController;
|
uEditorDBBase, uBizFabricantes, uFabricantesController, uGUIBase;
|
||||||
|
|
||||||
type
|
type
|
||||||
IEditorFabricantes = interface
|
IEditorFabricantes = interface(ICustomEditor)
|
||||||
['{1DD6E573-CCD8-4443-9AC3-378CF63EB639}']
|
['{BCA44D6E-18A9-4F38-9D52-9A2F6C721DA3}']
|
||||||
function GetFabricantes: IBizFabricante;
|
function GetFabricantes: IBizFabricante;
|
||||||
procedure SetFabricantes(const Value: IBizFabricante);
|
procedure SetFabricantes(const Value: IBizFabricante);
|
||||||
property Fabricantes: IBizFabricante read GetFabricantes write SetFabricantes;
|
property Fabricantes: IBizFabricante read GetFabricantes write SetFabricantes;
|
||||||
|
|||||||
@ -3,10 +3,10 @@ unit uIEditorFamilias;
|
|||||||
interface
|
interface
|
||||||
|
|
||||||
uses
|
uses
|
||||||
uEditorDBBase, uBizFamilias, uFamiliasController;
|
uEditorDBBase, uBizFamilias, uFamiliasController, uGUIBase;
|
||||||
|
|
||||||
type
|
type
|
||||||
IEditorFamilias = interface
|
IEditorFamilias = interface(ICustomEditor)
|
||||||
['{28CD8E74-C3D5-4862-A8F9-CF0EE3E79FED}']
|
['{28CD8E74-C3D5-4862-A8F9-CF0EE3E79FED}']
|
||||||
function GetFamilias: IBizFamilia;
|
function GetFamilias: IBizFamilia;
|
||||||
procedure SetFamilias(const Value: IBizFamilia);
|
procedure SetFamilias(const Value: IBizFamilia);
|
||||||
|
|||||||
@ -3,10 +3,10 @@ unit uIEditorUnidadesMedida;
|
|||||||
interface
|
interface
|
||||||
|
|
||||||
uses
|
uses
|
||||||
uEditorDBBase, uBizUnidadesMedida, uUnidadesMedidaController;
|
uEditorDBBase, uBizUnidadesMedida, uUnidadesMedidaController, uGUIBase;
|
||||||
|
|
||||||
type
|
type
|
||||||
IEditorUnidadesMedida = interface
|
IEditorUnidadesMedida = interface(ICustomEditor)
|
||||||
['{5786FFF0-8036-4018-B77E-CE98F1FF1CD9}']
|
['{5786FFF0-8036-4018-B77E-CE98F1FF1CD9}']
|
||||||
function GetUnidadesMedida: IBizUnidadMedida;
|
function GetUnidadesMedida: IBizUnidadMedida;
|
||||||
procedure SetUnidadesMedida(const Value: IBizUnidadMedida);
|
procedure SetUnidadesMedida(const Value: IBizUnidadMedida);
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user