git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@1024 0c75b7a4-871f-7646-8a2f-f78d34cc349f
39 lines
1.6 KiB
ObjectPascal
39 lines
1.6 KiB
ObjectPascal
unit uFacturasClienteViewRegister;
|
|
|
|
interface
|
|
|
|
procedure RegisterViews;
|
|
procedure UnregisterViews;
|
|
|
|
implementation
|
|
|
|
uses
|
|
uEditorRegistryUtils, uEditorFacturasCliente, uEditorFacturaCliente,
|
|
uEditorFacturasClienteReport, uEditorElegirArticulosFacturaCliente,
|
|
uEditorElegirFacturasCliente, uDialogOpcionesImpresionFacturasCliente,
|
|
uDialogListaFacturasClienteEnvioEMail;
|
|
|
|
procedure RegisterViews;
|
|
begin
|
|
EditorRegistry.RegisterClass(TfEditorFacturasCliente, 'EditorFacturasCliente');
|
|
EditorRegistry.RegisterClass(TfEditorFacturaCliente, 'EditorFacturaCliente');
|
|
EditorRegistry.RegisterClass(TfEditorElegirArticulosFacturaCliente, 'EditorElegirArticulosFacturaCliente');
|
|
EditorRegistry.RegisterClass(TfEditorElegirFacturasCliente, 'EditorElegirFacturasCliente');
|
|
EditorRegistry.RegisterClass(TfEditorFacturasClientePreview, 'EditorFacturasClientePreview');
|
|
EditorRegistry.RegisterClass(TfDialogOpcionesImpresionFacturasCliente, 'DialogOpcionesImpresionFacturasCliente');
|
|
EditorRegistry.RegisterClass(TfDialogListaFacturasClienteEnvioEMail, 'DialogListaFacturasClienteEnvioEMail');
|
|
end;
|
|
|
|
procedure UnregisterViews;
|
|
begin
|
|
EditorRegistry.UnRegisterClass(TfEditorFacturasCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorFacturaCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirArticulosFacturaCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirFacturasCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorFacturasClientePreview);
|
|
EditorRegistry.UnRegisterClass(TfDialogOpcionesImpresionFacturasCliente);
|
|
EditorRegistry.UnRegisterClass(TfDialogListaFacturasClienteEnvioEMail);
|
|
end;
|
|
|
|
end.
|