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;

type
  IViewClientes = interface(IViewContactos)
  ['{7964E0AB-3075-43E7-94BC-513D80A1C116}']
  end;

  TfrViewClientes = class(TfrViewContactos, IViewClientes)
    cxGridViewNOMBRE_COMERCIAL: TcxGridDBColumn;
    cxGridViewBLOQUEADO: TcxGridDBColumn;
  private
    { Private declarations }
    FHintDisplayed: Boolean;
    FGridRecord: TcxCustomGridRecord;
    FItem: TcxCustomGridTableItem;  
  end;
  

implementation

uses uViewGridBase;


{$R *.dfm}


end.