unit uViewProveedores; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, uViewContactos, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData, ActnList, uDADataTable, cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid, JvComponent, JvFormAutoSize, ImgList, PngImageList, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns, dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore, dxPScxCommon, dxPScxGridLnk, uViewFiltroBase; type IViewProveedores = interface(IViewContactos) ['{C3E0BA52-4887-49B7-8FAA-8A47C861FC70}'] end; TfrViewProveedores = class(TfrViewContactos, IViewProveedores) cxGrid1ViewFAX: TcxGridDBColumn; end; implementation {$R *.dfm} end.