git-svn-id: https://192.168.0.254/svn/Proyectos.AbetoDesign_FactuGES/trunk@40 93f398dd-4eb6-7a46-baf6-13f46f578da2
34 lines
1.2 KiB
ObjectPascal
34 lines
1.2 KiB
ObjectPascal
unit uFacturasClienteViewRegister;
|
|
|
|
interface
|
|
|
|
procedure RegisterViews;
|
|
procedure UnregisterViews;
|
|
|
|
implementation
|
|
|
|
uses
|
|
uEditorRegistryUtils, uEditorFacturasCliente, uEditorFacturaCliente,
|
|
uEditorFacturasClienteReport, uEditorElegirArticulosFacturaCliente,
|
|
uEditorElegirFacturasCliente;
|
|
|
|
procedure RegisterViews;
|
|
begin
|
|
EditorRegistry.RegisterClass(TfEditorFacturasCliente, 'EditorFacturasCliente');
|
|
EditorRegistry.RegisterClass(TfEditorFacturaCliente, 'EditorFacturaCliente');
|
|
EditorRegistry.RegisterClass(TfEditorElegirArticulosFacturaCliente, 'EditorElegirArticulosFacturaCliente');
|
|
EditorRegistry.RegisterClass(TfEditorElegirFacturasCliente, 'EditorElegirFacturasCliente');
|
|
EditorRegistry.RegisterClass(TfEditorFacturasClientePreview, 'EditorFacturasClientePreview');
|
|
end;
|
|
|
|
procedure UnregisterViews;
|
|
begin
|
|
EditorRegistry.UnRegisterClass(TfEditorFacturasCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorFacturaCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirArticulosFacturaCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirFacturasCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorFacturasClientePreview);
|
|
end;
|
|
|
|
end.
|