unit uContratosClienteViewRegister; interface procedure RegisterViews; procedure UnregisterViews; implementation uses uEditorRegistryUtils, uEditorContratosCliente, uEditorContratosClienteBeneficios, uEditorContratoCliente, uEditorElegirContratosCliente, uEditorElegirArticulosContratoCliente, uEditorContratosClienteReport, uEditorDireccionEntregaContratoCliente; procedure RegisterViews; begin EditorRegistry.RegisterClass(TfEditorContratosClienteBeneficios, 'EditorContratosClienteBeneficios'); EditorRegistry.RegisterClass(TfEditorContratosCliente, 'EditorContratosCliente'); EditorRegistry.RegisterClass(TfEditorContratoCliente, 'EditorContratoCliente'); EditorRegistry.RegisterClass(TfEditorElegirContratosCliente, 'EditorElegirContratosCliente'); EditorRegistry.RegisterClass(TfEditorElegirArticulosContratoCliente, 'EditorElegirArticulosContratosCliente'); EditorRegistry.RegisterClass(TfEditorContratosClientePreview, 'EditorContratosClientePreview'); EditorRegistry.RegisterClass(TfEditorDireccionEntregaContratoCliente, 'EditorDireccionEntregaContratoCliente'); end; procedure UnregisterViews; begin EditorRegistry.UnRegisterClass(TfEditorContratosClienteBeneficios); EditorRegistry.UnRegisterClass(TfEditorContratosCliente); EditorRegistry.UnRegisterClass(TfEditorContratoCliente); EditorRegistry.UnRegisterClass(TfEditorElegirContratosCliente); EditorRegistry.UnRegisterClass(TfEditorElegirArticulosContratoCliente); EditorRegistry.UnRegisterClass(TfEditorContratosClientePreview); EditorRegistry.UnRegisterClass(TfEditorDireccionEntregaContratoCliente); end; end.