FactuGES2/Source/Modulos/Contactos/Views/uContactosViewRegister.pas

69 lines
2.6 KiB
ObjectPascal

unit uContactosViewRegister;
interface
procedure RegisterViews;
procedure UnregisterViews;
implementation
uses
uEditorRegistryUtils,
uEditorClientes, uEditorProveedores,
uEditorEmpleados, uEditorElegirCLientes,
uEditorCliente, uEditorProveedor,
uEditorEmpleado, uEditorElegirProveedores, uEditorDireccion,
uEditorGruposCliente, uEditorProcedenciasCliente,
uEditorGruposProveedor, uEditorGruposEmpleado,
uEditorFichasEmpleadoReport, uEditorEtiquetasContactosReport;
procedure RegisterViews;
begin
EditorRegistry.RegisterClass(TfEditorClientes, 'EditorClientes');
EditorRegistry.RegisterClass(TfEditorProveedores, 'EditorProveedores');
EditorRegistry.RegisterClass(TfEditorEmpleados, 'EditorEmpleados');
EditorRegistry.RegisterClass(TfEditorCliente, 'EditorCliente');
EditorRegistry.RegisterClass(TfEditorProveedor, 'EditorProveedor');
EditorRegistry.RegisterClass(TfEditorEmpleado, 'EditorEmpleado');
EditorRegistry.RegisterClass(TfEditorElegirClientes, 'EditorElegirClientes');
EditorRegistry.RegisterClass(TfEditorElegirProveedores, 'EditorElegirProveedores');
EditorRegistry.RegisterClass(TfEditorDireccion, 'EditorDireccion');
EditorRegistry.RegisterClass(TfEditorGruposCliente, 'EditorGruposCliente');
EditorRegistry.RegisterClass(TfEditorProcedenciasCliente, 'EditorProcedenciasCliente');
EditorRegistry.RegisterClass(TfEditorGruposProveedor, 'EditorGruposProveedor');
EditorRegistry.RegisterClass(TfEditorGruposEmpleado, 'EditorGruposEmpleado');
EditorRegistry.RegisterClass(TfEditorFichasEmpleadoPreview, 'EditorFichasEmpleadoPreview');
EditorRegistry.RegisterClass(TfEditorEtiquetasContactosPreview, 'EditorEtiquetasContactosPreview');
end;
procedure UnregisterViews;
begin
EditorRegistry.UnRegisterClass(TfEditorClientes);
EditorRegistry.UnRegisterClass(TfEditorProveedores);
EditorRegistry.UnRegisterClass(TfEditorEmpleados);
EditorRegistry.UnRegisterClass(TfEditorCliente);
EditorRegistry.UnRegisterClass(TfEditorProveedor);
EditorRegistry.UnRegisterClass(TfEditorEmpleado);
EditorRegistry.UnRegisterClass(TfEditorElegirClientes);
EditorRegistry.UnRegisterClass(TfEditorElegirProveedores);
EditorRegistry.UnRegisterClass(TfEditorDireccion);
EditorRegistry.UnRegisterClass(TfEditorGruposCliente);
EditorRegistry.UnRegisterClass(TfEditorProcedenciasCliente);
EditorRegistry.UnRegisterClass(TfEditorGruposProveedor);
EditorRegistry.UnRegisterClass(TfEditorGruposEmpleado);
EditorRegistry.UnRegisterClass(TfEditorFichasEmpleadoPreview);
EditorRegistry.UnRegisterClass(TfEditorEtiquetasContactosPreview);
end;
end.