Noviseda_FactuGES2/Source/Modulos/Inventario/Views/uEditorElegirArticulosCatalogo.pas

unit uEditorElegirArticulosCatalogo;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, uEditorElegirArticulos, Menus, DB, uDADataTable, JvAppStorage,
  JvAppRegistryStorage, JvComponentBase, JvFormPlacement, ImgList, PngImageList,
  StdActns, ActnList, uCustomView, uViewBase, uViewBarraSeleccion, ComCtrls,
  JvExComCtrls, JvStatusBar, SpTBXItem, TB2ExtItems,  TB2Item, TB2Dock,
  TB2Toolbar, pngimage, ExtCtrls, JvExControls, JvComponent, JvNavigationPane,
  uIEditorElegirArticulosCatalogo, uDAInterfaces,
  uViewGridBase, uViewGrid, uViewArticulos, uViewElegirArticulosCatalogo;

type
  TfEditorElegirArticulosCatalogo = class(TfEditorElegirArticulos, IEditorElegirArticulosCatalogo)
    frViewElegirArticulosCatalogo1: TfrViewElegirArticulosCatalogo;
  public
    constructor Create(AOwner: TComponent); override;
  end;


implementation
{$R *.dfm}

{ TfEditorElegirArticulosCatalogo }

constructor TfEditorElegirArticulosCatalogo.Create(AOwner: TComponent);
begin
  inherited;
  ViewGrid := CreateView(TfrViewElegirArticulosCatalogo) as IViewElegirArticulosCatalogo;
end;

end.