ehlib 用法記錄

2021-09-08 11:37:57 字數 2727 閱讀 9522

點列頭排序

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 的安裝方...