git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@1024 0c75b7a4-871f-7646-8a2f-f78d34cc349f
42 lines
1.8 KiB
ObjectPascal
42 lines
1.8 KiB
ObjectPascal
unit uPedidosProveedorViewRegister;
|
|
|
|
interface
|
|
|
|
procedure RegisterViews;
|
|
procedure UnregisterViews;
|
|
|
|
implementation
|
|
|
|
uses
|
|
uEditorRegistryUtils, uEditorPedidosProveedor, uEditorPedidoProveedor,
|
|
uEditorPedidosProveedorReport, uEditorElegirPedidosProveedor,
|
|
uEditorElegirArticulosPedidoProveedor, uEditorDireccionEntregaPedidoProveedor,
|
|
uEditorSituacionPedidoProveedor, uDialogListaPedidosProveedorEnvioEMail;
|
|
|
|
procedure RegisterViews;
|
|
begin
|
|
EditorRegistry.RegisterClass(TfEditorDireccionEntregaPedidoProveedor, 'EditorDireccionEntregaPedidoProveedor');
|
|
EditorRegistry.RegisterClass(TfEditorPedidosProveedor, 'EditorPedidosProveedor');
|
|
EditorRegistry.RegisterClass(TfEditorPedidoProveedor, 'EditorPedidoProveedor');
|
|
EditorRegistry.RegisterClass(TfEditorElegirPedidosProveedor, 'EditorElegirPedidosProveedor');
|
|
EditorRegistry.RegisterClass(TfEditorElegirArticulosPedidoProveedor, 'EditorElegirArticulosPedidoProveedor');
|
|
EditorRegistry.RegisterClass(TfEditorPedidosProveedorPreview, 'EditorPedidosProveedorPreview');
|
|
EditorRegistry.RegisterClass(TfEditorSituacionPedidoProveedor, 'EditorSituacionPedidoProveedor');
|
|
EditorRegistry.RegisterClass(TfDialogListaPedidosProveedorEnvioEMail, 'DialogListaPedidosProveedorEnvioEMail');
|
|
end;
|
|
|
|
procedure UnregisterViews;
|
|
begin
|
|
EditorRegistry.UnRegisterClass(TfEditorDireccionEntregaPedidoProveedor);
|
|
EditorRegistry.UnRegisterClass(TfEditorPedidosProveedor);
|
|
EditorRegistry.UnRegisterClass(TfEditorPedidoProveedor);
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirPedidosProveedor);
|
|
EditorRegistry.UnRegisterClass(TfEditorElegirArticulosPedidoProveedor);
|
|
EditorRegistry.UnRegisterClass(TfEditorPedidosProveedorPreview);
|
|
EditorRegistry.UnRegisterClass(TfEditorSituacionPedidoProveedor);
|
|
EditorRegistry.UnRegisterClass(TfDialogListaPedidosProveedorEnvioEMail);
|
|
end;
|
|
|
|
end.
|
|
|