在Delphi中如何動態更改DBGrid的顏色

2021-08-30 21:23:37 字數 545 閱讀 6081

dbgrid控制項是乙個有許多使用者介面的顯示資料庫的控制項,以下的程式告訴您如何根據顯示的內容改變字型的顯示顏色。例如,如果乙個城市的人口大於200萬,我們就讓它顯示為藍色。使用的控制項事件為dbgrid.ondrawcolumecell.

procedure tform1.dbgrid1drawcolumncell(sender: tobject; const rect:trect;datacol:

integer; column: tcolumn; state: tgriddrawstate);

begin

if table1.fieldbyname('population').asinteger > 20000000 then

dbgrid1.canvas.font.color := clblue;

dbgrid1.defaultdrawcolumncell(rect, datacol, column, state);

end;

上面的例子是簡單的,但是你可以根據自己的需要擴充,例如字型也變化等,甚至你可以呼叫畫圓的函式在數字上畫上乙個紅色的圓圈。

在delphi中如何動態建立類的例項

在物件導向語言中,用兩種方法建立類的例項 靜態建立和動態建立。靜態建立就是在程式中顯式地建立類的例項,如c1 tclass1.create 而動態建立是在只知道類名的前題下建立類的例項。動態建立在實現上要比靜態建立更靈活,因為動態建立無需引用被建立類,並且更容易實現如多型等物件導向特性。一 動態建立...

在delphi中如何動態建立類的例項

在物件導向語言中,用兩種方法建立類的例項 靜態建立和動態建立。靜態建立就是在程式中顯式地建立類的例項,如c1 tclass1.create 而動態建立是在只知道類名的前題下建立類的例項。動態建立在實現上要比靜態建立更靈活,因為動態建立無需引用被建立類,並且更容易實現如多型等物件導向特性。一 動態建立...

DELPHI中動態呼叫dll

顯式例子 unit main inte ce uses windows,messages,sysutils,variants,classes,graphics,controls,forms,dialogs,stdctrls,extctrls,grids,dbgrids,db,dbtables,dbc...