unit uViewAlbaranesDevProveedor; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, uViewAlbaranesProveedor, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB, cxDBData, cxImageComboBox, cxCurrencyEdit, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns, dxPSEdgePatterns, dxPgsDlg, dxPSCore, ImgList, PngImageList, ActnList, cxGridCustomPopupMenu, cxGridPopupMenu, dxPScxCommon, dxPScxGrid6Lnk, uDADataTable, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uViewFiltroBase, cxGridLevel, cxGridCustomTableView, cxGridTableView, cxGridDBTableView, cxClasses, cxControls, cxGridCustomView, cxGrid, cxTextEdit; type IViewAlbaranesDevProveedor = interface(IViewAlbaranesProveedor) ['{FB031921-EC00-402F-820D-2EFE0EBB8FCC}'] end; TfrViewAlbaranesDevProveedor = class(TfrViewAlbaranesProveedor, IViewAlbaranesDevProveedor) procedure CustomViewCreate(Sender: TObject); end; implementation {$R *.dfm} procedure TfrViewAlbaranesDevProveedor.CustomViewCreate(Sender: TObject); begin inherited; cxGridViewREF_PED_PROVEEDOR.Destroy; cxGridViewCALLE.Destroy; cxGridViewCODIGO_POSTAL.Destroy; cxGridViewPOBLACION.Destroy; cxGridViewPROVINCIA.Destroy; end; end.