unit uViewProveedores; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, uViewContactos, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns, dxPSEdgePatterns, ImgList, PngImageList, cxGridCustomPopupMenu, cxGridPopupMenu, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, uDADataTable, cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid, dxPgsDlg, ActnList, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase, cxImageComboBox, uDAInterfaces, uCustomView, uViewBase; type IViewProveedores = interface(IViewContactos) ['{C64C0439-5D1D-4B60-9FC0-4E75E58F7384}'] end; TfrViewProveedores = class(TfrViewContactos, IViewProveedores) cxGridViewTIENDA_WEB: TcxGridDBColumn; cxGridViewNOMBRE_COMERCIAL: TcxGridDBColumn; end; implementation {$R *.dfm} end.