git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES2/trunk@194 b2cfbe5a-eba1-4a0c-8b32-7feea0a119f2
47 lines
1.8 KiB
ObjectPascal
47 lines
1.8 KiB
ObjectPascal
unit uPedidosClienteViewRegister;
|
|
|
|
interface
|
|
|
|
procedure RegisterViews;
|
|
procedure UnregisterViews;
|
|
|
|
implementation
|
|
|
|
uses
|
|
uEditorRegistryUtils,
|
|
uEditorPedidosCliente,
|
|
uEditorPedidoCliente,
|
|
uEditorPedidosClienteReport,
|
|
uDialogListaPedidosClienteEnvioEMail,
|
|
// uEditorElegirPedidosCliente,
|
|
uEditorElegirArticulosPedidoCliente,
|
|
uEditorDireccionEntregaPedidoCliente;
|
|
// uEditorSituacionPedidoCliente;
|
|
|
|
procedure RegisterViews;
|
|
begin
|
|
EditorRegistry.RegisterClass(TfEditorDireccionEntregaPedidoCliente, 'EditorDireccionEntregaPedidoCliente');
|
|
EditorRegistry.RegisterClass(TfEditorPedidosCliente, 'EditorPedidosCliente');
|
|
EditorRegistry.RegisterClass(TfEditorPedidoCliente, 'EditorPedidoCliente');
|
|
// EditorRegistry.RegisterClass(TfEditorElegirPedidosCliente, 'EditorElegirPedidosCliente');
|
|
EditorRegistry.RegisterClass(TfEditorElegirArticulosPedidoCliente, 'EditorElegirArticulosPedidoCliente');
|
|
EditorRegistry.RegisterClass(TfEditorPedidosClientePreview, 'EditorPedidosClientePreview');
|
|
// EditorRegistry.RegisterClass(TfEditorSituacionPedidoCliente, 'EditorSituacionPedidoCliente');
|
|
EditorRegistry.RegisterClass(TfDialogListaPedidosClienteEnvioEMail, 'DialogListaPedidosClienteEnvioEMail');
|
|
end;
|
|
|
|
procedure UnregisterViews;
|
|
begin
|
|
EditorRegistry.UnRegisterClass(TfEditorDireccionEntregaPedidoCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorPedidosCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorPedidoCliente);
|
|
// EditorRegistry.UnRegisterClass(TfEditorElegirPedidosCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirArticulosPedidoCliente);
|
|
EditorRegistry.UnRegisterClass(TfEditorPedidosClientePreview);
|
|
EditorRegistry.UnRegisterClass(TfDialogListaPedidosClienteEnvioEMail);
|
|
// EditorRegistry.UnRegisterClass(TfEditorSituacionPedidoCliente);
|
|
end;
|
|
|
|
end.
|
|
|