git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES/trunk@297 c93665c3-c93d-084d-9b98-7d5f4a9c3376
42 lines
1.7 KiB
ObjectPascal
42 lines
1.7 KiB
ObjectPascal
unit uAlbaranesClienteViewRegister;
|
|
|
|
interface
|
|
|
|
procedure RegisterViews;
|
|
procedure UnregisterViews;
|
|
|
|
implementation
|
|
|
|
uses
|
|
uEditorRegistryUtils, uEditorAlbaranesCliente, uEditorAlbaranCliente,
|
|
uEditorElegirArticulosAlbaranCliente, uEditorAlbaranesClienteReport,
|
|
uEditorElegirAlbaranesCliente, uEditorAlbaranesDevCliente, uEditorAlbaranDevCliente,
|
|
uDialogListaAlbaranesCliEnvioEMail;
|
|
|
|
procedure RegisterViews;
|
|
begin
|
|
EditorRegistry.RegisterClass(TfEditorAlbaranesCliente, 'EditorAlbaranesCliente');
|
|
EditorRegistry.RegisterClass(TfEditorAlbaranCliente, 'EditorAlbaranCliente');
|
|
EditorRegistry.RegisterClass(TfEditorAlbaranesDevCliente, 'EditorAlbaranesDevCliente');
|
|
EditorRegistry.RegisterClass(TfEditorAlbaranDevCliente, 'EditorAlbaranDevCliente');
|
|
EditorRegistry.RegisterClass(TfEditorElegirArticulosAlbaranCliente, 'EditorElegirArticulosAlbaranesCliente');
|
|
EditorRegistry.RegisterClass(TfEditorAlbaranesClientePreview, 'EditorAlbaranesClientePreview');
|
|
EditorRegistry.RegisterClass(TfEditorElegirAlbaranesCliente, 'EditorElegirAlbaranesCliente');
|
|
EditorRegistry.RegisterClass(TfDialogListaAlbaranesCliEnvioEMail, 'DialogListaAlbaranesCliEnvioEMail');
|
|
end;
|
|
|
|
procedure UnregisterViews;
|
|
begin
|
|
EditorRegistry.UnRegisterClass(TfEditorAlbaranesCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorAlbaranCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorAlbaranesDevCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorAlbaranDevCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirArticulosAlbaranCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorAlbaranesClientePreview);
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirAlbaranesCliente);
|
|
EditorRegistry.UnRegisterClass(TfDialogListaAlbaranesCliEnvioEMail);
|
|
end;
|
|
|
|
end.
|
|
|