線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1126
推到 Plurk!
推到 Facebook!

DBGRID 依奇偶行變色問題

缺席
stonys
初階會員


發表:64
回覆:111
積分:38
註冊:2002-09-28

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-04-17 22:10:45 IP:211.74.xxx.xxx 未訂閱
各位前輩好 小弟參考了一些前輩的資料 得知要讓dbgrid變色的方法,也依此照作 寫了以下程式 procedure TCODEFORM.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); var i:integer; begin i:=ADOQuery1.RecNo; if (i mod 2) =1 then DBGrid1.Canvas.Brush.Color:=clblue else DBGrid1.Canvas.Brush.Color:=clred; dbgrid1.DefaultDrawColumnCell(rect,datacol,column,state); end; 想讓dbgird隨著資料筆數的奇偶行變色 很奇怪的是,如果是顯示狀態就沒問題... 可是當我要新增一筆資料時,會發現dbgrid都變成同樣的顏色了(紅色) 想請教如果我想在任何時刻都達成奇偶行顏色不同... 請教該怎麼作呢? 即,新增一筆資料時,他會自動判斷底色的意思,謝謝!
系統時間:2024-07-01 4:12:16
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!