git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@425 f4e31baf-9722-1c47-927c-6f952f962d4b
36 lines
1.4 KiB
ObjectPascal
36 lines
1.4 KiB
ObjectPascal
unit uPresupuestosClienteViewRegister;
|
|
|
|
interface
|
|
|
|
procedure RegisterViews;
|
|
procedure UnregisterViews;
|
|
|
|
implementation
|
|
|
|
uses
|
|
uEditorRegistryUtils, uEditorPresupuestosCliente, uEditorPresupuestoCliente, uEditorElegirPresupuestosCliente,
|
|
uEditorElegirArticulosPresupuestoCliente, uEditorPresupuestosClienteReport, uEditorAsignarDescuento;
|
|
|
|
procedure RegisterViews;
|
|
begin
|
|
EditorRegistry.RegisterClass(TfEditorPresupuestosCliente, 'EditorPresupuestosCliente');
|
|
EditorRegistry.RegisterClass(TfEditorPresupuestoCliente, 'EditorPresupuestoCliente');
|
|
EditorRegistry.RegisterClass(TfEditorElegirPresupuestosCliente, 'EditorElegirPresupuestosCliente');
|
|
EditorRegistry.RegisterClass(TfEditorElegirArticulosPresupuestoCliente, 'EditorElegirArticulosPresupuestosCliente');
|
|
EditorRegistry.RegisterClass(TfEditorPresupuestosClientePreview, 'EditorPresupuestosClientePreview');
|
|
EditorRegistry.RegisterClass(TfEditorAsignarDescuento, 'EditorAsignarDescuento');
|
|
end;
|
|
|
|
procedure UnregisterViews;
|
|
begin
|
|
EditorRegistry.UnRegisterClass(TfEditorPresupuestosCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorPresupuestoCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirPresupuestosCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirArticulosPresupuestoCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorPresupuestosClientePreview);
|
|
EditorRegistry.UnRegisterClass(TfEditorAsignarDescuento);
|
|
end;
|
|
|
|
end.
|
|
|