unit uEditorElegirArticulosFacturaProforma; 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, TBX, TB2ExtItems, TBXExtItems, TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls, JvExControls, JvComponent, JvNavigationPane, uIEditorElegirArticulosFacturasCliente, uDAInterfaces, uViewGridBase, uViewGrid, uViewArticulos, StdCtrls; type TfEditorElegirArticulosFacturaProforma = class(TfEditorElegirArticulos, IEditorElegirArticulosFacturasCliente) public constructor Create(AOwner: TComponent); override; end; implementation {$R *.dfm} uses uViewElegirArticulosFacturasCliente; { TfEditorElegirArticulosFacturaCliente } constructor TfEditorElegirArticulosFacturaProforma.Create(AOwner: TComponent); begin inherited; ViewGrid := CreateView(TfrViewElegirArticulosFacturasCliente) as IViewElegirArticulosFacturasCliente; end; end.