ehlib 用法記錄

點列頭排序

1.add  ehlibado.pas  to project.

2.grideh>columndefvalues>title>titlebutton=true;

3.grideh>sortlocal=true;

4.grideh>optionseh>dghautosortmarking=true;

install component

open ehlib.dpk,replace ,then install ok!

in '    replace to  in '..\common\

grideh隔行變色:evenrowcolor/oddrowcolor

grid的title：漸變色，titleparams.fillstyle=cfstgradienteh

動態建立grid列

var

column : tcolumneh;
begin
self.dbgrideh1.columns.addallcolumns( true );
column :=self.dbgrideh1.columns.add;
column.title.caption := '姓名'
; column.width := 70
; column.fieldname := '
name
';

tcolumneh *column;

column = dbgrideh1->columns->add( );
column->fieldname = "
name";
column->title->caption = "姓名"
; column->width = 70;

這個父容器釋放的時候會自動釋放，所以不存在記憶體洩漏。

尾行合計

方法：雙擊grideh開啟字段列表；選擇需要求和的字段，有個屬性footer

grideh編輯框當前單元格的值，正在編輯的值，正在輸入的值，當前輸入的值

self.dbgrideh1.inplaceeditor.text

if grid.inplaceeditorvisible then

result := grid.inplaceeditor.text

result := grid.inplaceeditor.top

讓進入編輯模式

dbgrideh1.editormode:=true;

inplaceeditor本質上是maskedit

tinplaceedit = class(tcustommaskedit)

procedure tcustomdbgrideh.showeditor;

procedure tcustomdbgrideh.updateedit; //計算位置

function tcustomdbgrideh.celleditrect(acol, arow: longint): trect;

dbgrideh.pas

function tcustomdbgrideh.celleditrect(acol, arow: longint): trect;

// abscrect.top :=abscrect.top+ 20;

result.top:= abscrect.top;

grideh編輯框垂直居中

procedure tform12.dbgrideh1drawcolumncell(sender: tobject; const

rect: trect;
datacol: integer; column: tcolumneh; state: tgriddrawstate);
varacol,arow:integer;
arect:trect;
begin
if self.dbgrideh1.titleheight<5
then caption:='0'
;if (self.dbgrideh1.inplaceeditor<>nil) and(self.dbgrideh1.inplaceeditor.visible) then
//and (self.dbgrideh1.inplaceeditor.top<=(25+ (self.fdmemtable1.recno-1)*(self.dbgrideh1.rowheight+1) ) then
begin
arect:=self.dbgrideh2.cellrectabs(datacol,dbgrideh1.row,true);
self.caption := format('
%d,%d,%d,%d
',[dbgrideh1.row, arect.top,dbgrideh1.inplaceeditor.top,dbgrideh1.inplaceeditor.height]);
dbgrideh1.inplaceeditor.alignment :=tacenter;
if( dbgrideh1.inplaceeditor.top <= 25+ 41*(dbgrideh1.row-1) ) then
self.dbgrideh1.inplaceeditor.top := self.dbgrideh1.inplaceeditor.top+10
;end;//
self.caption:='cc';
end;

EhLib 使用教程 Ehlib 過濾功能的實現

dbgrideh 可以為你提供乙個更加美觀和功能豐富的 dbgird，比如平面化顯示 奇偶行不同顏色 斑馬線 快速查詢 合計行 grid 列印等。在 ehlib 的後期版本中，還提供了乙個非常強大的過濾功能，他會在 dbgrid 的表頭下方顯示乙個過濾行，使用者在此行的相應列中輸入查詢條件，dbgr...

安裝ehlib控制項

1 當然是先要解除安裝以前安裝的ehlib元件了，在選單的 component 的 install packeges 裡，選擇ehlib xx，選擇 remove 2 最後就是要安裝元件了，然後開啟ehlib目錄下的ehlib70.dpk，選擇 compile 編譯一下，不要安裝，隨後再開啟dcle...

EhLib 的安裝方法

delphi控制項安裝 ehlib 的安裝方法。每次安裝delphi 不管是d7 還是d6總是和她戰鬥很長時間，不是d7本身的問題，而是一大堆控制項的問題。所以每次安裝的時候都很頭疼，下面是在網上的一篇安裝ehlib的教程，對我太有幫助啦。此篇 ehlib 使用教程簡單描述一下 ehlib 的安裝方...