使用TdxDBGrid時該如何做到內容<0時字體變為紅色?? |
尚未結案
|
jch
中階會員 發表:111 回覆:224 積分:66 註冊:2003-12-01 發送簡訊給我 |
|
terrychen
尊榮會員 發表:90 回覆:794 積分:501 註冊:2003-05-01 發送簡訊給我 |
|
jch
中階會員 發表:111 回覆:224 積分:66 註冊:2003-12-01 發送簡訊給我 |
|
jch
中階會員 發表:111 回覆:224 積分:66 註冊:2003-12-01 發送簡訊給我 |
|
StrongLemon
高階會員 發表:10 回覆:166 積分:105 註冊:2004-04-18 發送簡訊給我 |
從元件面版上拉下TcxStyleRepository
右鍵Edit..然後新增Style
在Style有顏色可以設定或者你在下面的code直接設定AStyle也可,
tv_TEST為TcxGirdXXXXView。
procedure TForm1.tv_TESTStylesGetContentStyle( Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord; AItem: TcxCustomGridTableItem; out AStyle: TcxStyle); begin if VarIsStr(ARecord.Values[AItem.Index]) then begin if ARecord.Values[AItem.Index]='*' then begin AStyle:=cxStyle2; end; end else if (ARecord.DisplayTexts[AItem.Index]='') and ( (AItem.Tag=2) or (AItem.Tag >=20000) ) then begin AStyle:=cxStyle1; end else begin if AItem.Tag=0 then begin AStyle:=cxStyle1; end else AStyle:=cxStyle3; end; end; |
jch
中階會員 發表:111 回覆:224 積分:66 註冊:2003-12-01 發送簡訊給我 |
|
StrongLemon
高階會員 發表:10 回覆:166 積分:105 註冊:2004-04-18 發送簡訊給我 |
|
jch
中階會員 發表:111 回覆:224 積分:66 註冊:2003-12-01 發送簡訊給我 |
|
speedup
資深會員 發表:19 回覆:259 積分:280 註冊:2003-07-04 發送簡訊給我 |
引言: 我的DevExpress頁籤裡只有6個元件,並沒有大哥所講的DX的library??? 我所安裝的是DevExpress.ExpressQuantumGrid.Pro.3.2.1.with.source.for.Delphi 是執行裡頭的SETUP安裝的,是否有其他的地方要在設定呢?? ======================== 我是DELPHI5的初學者DevExpress 目前分兩個系列分別為dxXXX 和 cxXXXX 凡是TcxXXX開頭都屬同系列;cx開頭是較新系列的元件,ExpressQuantumGrid 4.0以後即採用此系列 樓上的範利用 cx系列 ,如果你的程式才剛開始寫建議採cx系列(兩系列存在不少差異,要轉換不是那麼容易) 混心雜欲 棄修身~唉
------
唉~ |
jch
中階會員 發表:111 回覆:224 積分:66 註冊:2003-12-01 發送簡訊給我 |
|
sl@cableplus.com.cn
高階會員 發表:168 回覆:359 積分:130 註冊:2004-03-26 發送簡訊給我 |
|
speedup
資深會員 發表:19 回覆:259 積分:280 註冊:2003-07-04 發送簡訊給我 |
引言: Cx系列有DELPHI5用的元件嗎?? ======================== 我是DELPHI5的初學者現在ExpressQuantumGrid/ExpressVerticalGrid/ExpressQuantumTreeList/的版本都是cx系類可用於版本D4/D5/D6/D7 等 http://www.devexpress.com/?section=/Home 混心雜欲 棄修身~唉
------
唉~ |
speedup
資深會員 發表:19 回覆:259 積分:280 註冊:2003-07-04 發送簡訊給我 |
引言: Cx系列有DELPHI5用的元件嗎?? ======================== 我是DELPHI5的初學者現在ExpressQuantumGrid/ExpressVerticalGrid/ExpressQuantumTreeList/的版本都是cx系類可用於版本D4/D5/D6/D7 等 http://www.devexpress.com/?section=/Home 混心雜欲 棄修身~唉
------
唉~ |
a6475
高階會員 發表:67 回覆:230 積分:154 註冊:2002-09-15 發送簡訊給我 |
我是用 3.x版 for d6的
procedure TMain.dxDBGrid1CustomDrawCell(Sender: TObject; ACanvas: TCanvas; ARect: TRect; ANode: TdxTreeListNode; AColumn: TdxTreeListColumn; ASelected, AFocused, ANewItemRow: Boolean; var AText: String; var AColor: TColor; AFont: TFont; var AAlignment: TAlignment; var ADone: Boolean); var DefColor : TColor; begin inherited; DefColor := AFont.Color; if ((AColumn = dxDBGrid1M1) or (AColumn = dxDBGrid1M2))then begin if (AText = '0') then begin AFont.Color := $00E8E8E8; end else // (AColumn AS TdxDBGridCurrencyColumn).DisplayFormat := '-0'; end else begin AFont.Color := DefColor; end; end;..-----------βλμε------------.. ◎Oo月夜 光明 藍更愁oO◎ 藍調月光城v4:http://inping.myweb.hinet.net/ (暫時使用中..) 明日報(藍調.月光):http://mypaper2.ttimes.com.tw/user/a6475 發表人 - a6475 於 2004/06/08 20:25:04
------
月夜 光明 藍更愁 |
jch
中階會員 發表:111 回覆:224 積分:66 註冊:2003-12-01 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |