ehlib v5 在delphi2010下的安装
1.卸载老版本
2.创建目录如 e:\\ehlib5
3.把RADStudio2010和common 文件夹下的文件拷贝到 e:\\ehlib5下 4.如需要，把e:\\ehlib5加入到lib:
Tools->Options->Delphi Options->Library - Win32->Library Path). 5.用 \打开EhLib140.Dpk，并编译； 然后打开EhLibDataDriversXX.Dpk，并编译；
6.然后打开并编译、安装：
DclEhLibXX.BPL，DclEhLibDataDriversXX.BPL： 即:
用 \打开DclEhLibXX.Dpk,DclEhLibDataDriversXX.Dpk,编译、安装; In \组件将出现
Delphi 7中的安装方法
1. 把 EhLib 中的 common 和 DataService 文件拷贝到 Delphi7 目录中.
2.在 TOOLS->Environment Options->Library->Library Path 中添入EHLIB路径。 3.打开新建文件夹中的 EHLIB70.DPK ,编译一下，但不要安装。 4.打开Ehlib中的DclEhLib70.DPK,编译,安装
5. 在Delphi 7中打开DclEhLib70.dpk，编译并安装。 6. 组件面板中出现一个EhLib的组件页。
7. 打开附带的DEMOS，编译并运行，测试安装成功。
以下是EHLIB的导出代码：（其实EHLIB的DEMO1中已有）
procedure TInvoiceManager.ppmSaveSelectionClick(Sender: TObject); var ExpClass:TDBGridEhExportClass; Ext:String; begin
SaveDialog1.FileName := 'file1'; if (ActiveControl is TDBGridEh) then if SaveDialog1.Execute then begin
case SaveDialog1.FilterIndex of
1: begin ExpClass := TDBGridEhExportAsText; Ext := 'txt'; end; 2: begin ExpClass := TDBGridEhExportAsCSV; Ext := 'csv'; end; 3: begin ExpClass := TDBGridEhExportAsHTML; Ext := 'htm'; end; 4: begin ExpClass := TDBGridEhExportAsRTF; Ext := 'rtf'; end;
5: begin ExpClass := TDBGridEhExportAsXLS; Ext := 'xls'; end; else
ExpClass := nil; Ext := ''; end;
if ExpClass <> nil then begin
if UpperCase(Copy(SaveDialog1.FileName,Length(SaveDialog1.FileName)-2,3)) <> UpperCase(Ext) then
SaveDialog1.FileName := SaveDialog1.FileName + '.' + Ext; SaveDBGridEhToExportFile(ExpClass,TDBGridEh(ActiveControl), SaveDialog1.FileName,False); end; end; end;
// 功能：设定 DbGridEh 合计行信息 // 参数： pDbGrid:TDBGridEh;
// pcFields : string ; 字段列表，字段用逗号分隔
// pvtType : TFooterValueType ; 统计类型 TFooterValueType = (fvtNon, fvtSum, fvtAvg, fvtCount, fvtFieldValue, fvtStaticText); // 引用：
// 例如：DbGridEhFoot( DbGridEh1, ´Number,Sum´, fvtSum ); 设定数量和金额字段为合计统计
//--------------------------------------------------------------------------------
Procedure DbGridEhFoot( pDbGrid:TDBGridEh; pcFields: string; pvtType : TFooterValueType );
var nFldLoop : integer ; cFieldName : string ; tmpFldList : TStrings ; begin
pDbGrid.FooterRowCount := 1; // 指定网格尾部统计行行数 pDbGrid.SumList.Active := true; // 激活统计
pDbGrid.FooterColor := clBtnFace ; // 指定统计行颜色 tmpFldList := TStringList.Create ; StrToStringList( Uppercase(pcFields),´,´,tmpFldList ); // 将字符串转换为串列表
For nFldLoop := 0 to pDbGrid.Columns.Count -1 do begin
cFieldName := pDbGrid.Columns[nFldLoop].FieldName ; // 网格列字段名 if tmpFldList.IndexOf( uppercase( cFieldName ) ) >= 0 then begin
pDbGrid.Columns[nFldLoop].Footer.ValueType := pvtType ; // 统计类型 end; end ;
tmpFldList.Free ; end;
一、如何在程序中确定Ehlib定义的报表表头颜色?
在执行打印之前，加上下面的语句：
DBGridEh1.FixedColor:=clLime;//clLime可以换成你想要的颜色比如clRed是红色等等 PrintDBgridEh1.Options:=[pghColored,pghFitingByColWidths];//方括号里的\是必需的，其它的根据你的需要决定取舍
================================================================
二、Ehlib中的PrintDBGridEh如何印页码,即第几页共几页
PrintDBGridEh1.PageFooter.CenterText:='第&[Page]页 共&[Pages]页' 在对象管理器中的相关位置有设
================================================================
三、本人刚学习使用ehlib包，现在要实现类似ehlib所带demo1中一个功能：点击dbgrid某列值
的下拉按纽（可以设置），弹出一个下拉列表（其内容是另一个dataset的）。我看demo1中 好象是使用了DBLookupComboboxEh，可我参看demo1怎么设置也不行，请指教。谢谢。
呵呵，这个效果没有用DBLoookupComboBoxEh，它是利用查找字段实现的。 它在Query1中，对应VName字段，增加了一个叫VName1的查找字段，这个 字段从qrVendors查找相关的数据，再在DBGridEh1显示VName1,这样显示 就是那种效果了。
===============================================================
四、Ehlib 怎样固定某几列？
只要设置dbGridEh的FrozenCols属性为几列即可.
五、定制网格标题 复杂标题
TDBGridEh 允许在多列上创建标题，例如：
设置 DBGridEh.UseMultiTitle 属性为 True 并且填充字段的标签或列标题的标题，可以使用下面的规则：字段标签中的文本部分或列标题必须由几部分组成，并且用 \分割，几个列的每一个通用部分都设置为相同。其它字段或标题必须在相应的部分包含同样的文本。
例如：
Field1.DisplayLabel := 'Title1|SubTitle1'; Field2.DisplayLabel := 'Title1|SubTitle2'; 或
DBGridEh.Columns[0].Title.Caption := 'Title1|SubTitle1'; DBGridEh.Columns[1].Title.Caption := 'Title1|SubTitle2'; 按钮式标题
设置Column.Title.TitleButton 为 True可以强制标题单元为按钮式。写 OnTitleBtnClick事件来控制用户单击标题单元时的操作。
六、标题属性的默认值
使用TDBGridEh.ColumnDefValues.Title来设置标题属性的默认值。
七、数据行高度
使用 RowHeight 和 RowLines 属性来指定数据行高。完整的数据行高 = 行线高度＋行高。设置 RowSizingAllowed 为 True 以允许可以在运行是使用鼠标来改变行高。
设置Column.WordWrap为True可以使数据行中文本多行显示。如果行高>文本行，它就换行。
八、显示备注字段
设置 DrawMemoText to True来显示文本式的备注字段。.
九、定制单元格字体及颜色
TDBGridEh 中的 Font 和 Color 属性描述了数据网格中绘制单元格的字体和颜色。 TColumnEh 中的 Font 和 Color 属性描述了指定列中绘制单元格的字体和颜色。
事件定制单元格字体及颜色
有几个事件可以让你能够在绘制单元格前定制单元格字体和颜色。你可以写TDBGridEh的OnDrawColumnCellEvent事件句柄来在控制在网格单元中绘制数据。你可以使用Canvas属性的方法来绘制单元格。但是如果你只想改变字体或颜色的属性，我建议你使用下面的事件。你可以写TDBGridEh的OnGetCellParams事件来控制在绘制数据单元以前所指定的操作。你可以改变绘制字体及背景色。这个事件适合你在想改变整行的字体或颜色时使用。如果你想改变指定列中单元格的属性，你可以使用TColumnEh.OnGetCellParams。写这个事件用来控制在一列数据单元被重绘或编辑时的操作。在一列数据单元被重绘以前，你可以改变绘制字体，背景色，对齐方式，图像索引，文本或检查框。在编辑一列数据单元以前，你可以改变编辑字体，背景色，文本或只读状态。
十、列属性的默认值
使用ColumnDefValues属性来设置列属性的默认值。新创建的列将从ColumnDefValues属性中获得属性值，并且直到第一次为其指定值为止。
在网格的适当位置放置编辑器. 在下拉列表中显示几个字段。
在下拉列表中显示几个下拉字段，需要设置列的LookupDisplayFields属性到字段的Semicolons属性来分割多个字段名。命名为Column.Field.LookupResultField的属性必须位于LookupDisplayFields列表中。多字段的下拉列表只能应用于下拉字段。
显示下拉方式的列
你可以通过KeyList 和 PickList 属性在相关的的字段中显示其它文本。KeyList显示包含在字段的值而非PickList索引所包含的值。 Column.NotInKeyListIndex to index of text from PickList that will be shown if field value do not contain in KeyList (for instance you can set index of text for Null field value). Set Column.DblClickNextval to True to change value on mouse double click.
下拉式计算器
对于 TDateField 和 TDateTimeField 字段，inplace 编辑器将显示下拉按钮以显示显示下拉计算器。设置 Column.ButtonStyle 为 cbsNone 以禁止显示下拉按钮。
设置编辑器颜色和字体
Inplace编辑器可以设置数据单元的颜色和字体。数据单元使用OnGetCellParams 事件来控制列的颜色和字体。 Inplace 编辑器在行高>一行的高度时自动设置为多行模式并且将列的属性 WordWrap 设置为True.
自动填充网格列宽到网格客户区
设置AutoFitColWidths为True以自动重置列宽来设置网格的宽度等于客户区宽度。 MinAutoFitWidth 属性决定网格的最小宽度，列宽将会被重新计算。 3D或平面外观
使用 OptionsEh 属性来显示/隐藏固定的3D框架，冷区，页脚以及数据行。
使用 Flat 属性来设置用平面方式显示数据网格。
从多种格式导入/导出数据到TDBGridEh。
EhLib 的函数集可以从DBGridEh导出数据到Text, Csv, HTML, RTF, XLS以及其内部格式。它可以保存数据到流（TStream对象）或文件。 例子 Pascal:
SaveDBGridEhToExportFile(TDBGridEhExportAsText,DBGridEh1,'c:\\temp\\file1.txt',False); C++:
SaveDBGridEhToExportFile(__classid(TDBGridEhExportAsText),DBGridEh1,\ile1.txt\