Tecsitel_FactuGES2/Source/Modulos/Contactos/Views/uViewClientes.pas

40 lines
1.2 KiB
ObjectPascal
Raw Normal View History

unit uViewClientes;
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, cxImage, PngImageList, ImgList, dxPSGlbl, dxPSUtl,
dxPSEngn, dxPrnPg, dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider,
dxPSFillPatterns, dxPSEdgePatterns, cxIntlPrintSys3, dxPSCore,
dxPScxCommon, cxImageComboBox, cxGridCustomPopupMenu, cxGridPopupMenu,
dxPScxGridLnk, ExtCtrls, JvComponentBase, JvBalloonHint, JvHint,
uViewFiltroBase, dxPgsDlg, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock,
uDAInterfaces;
type
IViewClientes = interface(IViewContactos)
['{7964E0AB-3075-43E7-94BC-513D80A1C116}']
end;
TfrViewClientes = class(TfrViewContactos, IViewClientes)
cxGridViewNOMBRE_COMERCIAL: TcxGridDBColumn;
cxGridViewBLOQUEADO: TcxGridDBColumn;
cxGridViewTiendaWeb: TcxGridDBColumn;
end;
implementation
uses uViewGridBase;
{$R *.dfm}
end.