點列頭排序
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列
varcolumn : 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; constrect: 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 的安裝方...