VFP 愛用者社區

thbstc · 註冊時間: 2004-03-09 文章: 6 第 1 樓

各位高手們請問一個問題
grid如附圖
其中第1,2,4題作答與正解的答案不符
我想設計成gaid顯示時,使第1,2,4題的欄位反白或變更背景色
像是一種註記..表示第1,2,4題答錯了....
謝謝

thbstc · 註冊時間: 2004-03-09 文章: 6 第 2 樓

對不起，附上圖片

syntech · 發表於: 星期二三月 09, 2004 3:18 pm 文章主題:

請查閱 DynamicBackColor, DynamicForeColor 相關用法

Ruey · 發表於: 星期三三月 10, 2004 10:32 am 文章主題:

Grid目前紀錄反白(轉貼)
http://vfp.sunyear.com.tw/viewtopic.php?t=1108

狀態是X時反白
this.columns[M_I].DynamicForeColor="IIf(stats="X",RG
B(255,255,255),RGB(0,0,0))"
this.columns[M_I].DynamicbackColor="IIf(stats="X",RG
B(0,0,0),RGB(255,255,255))"

thbstc · 註冊時間: 2004-03-09 文章: 6 第 5 樓

謝謝各位的答覆,因為是初學者所以請問 [M_I] 是什麼呢?
我希望的GRID產生時便依題反白..而不是將目前的記錄反白!!

Ruey · 發表於: 星期三三月 10, 2004 5:36 pm 文章主題:

抱歉.我人在外面.沒仔細看
我抄襲自的文章
http://vfp.sunyear.com.tw/viewtopic.php?t=344

M_I是Grid第幾欄位

for m_i=1 to THIS.ColumnCount
this.columns[M_I].DynamicForeColor="IIf(stats="X",RG
B(255,255,255),RGB(0,0,0))"
this.columns[M_I].DynamicbackColor="IIf(stats="X",RG
B(0,0,0),RGB(255,255,255))"
next

朱育興 · 發表於: 星期三三月 10, 2004 10:08 pm 文章主題:

那下面這個如何

This.SetAll("DynamicBackColor","IIF(作答=正解,RGB(0,0,0),RGB(255,255,255))","Column")
This.SetAll("DynamicForeColor","IIF(作答=正解,RGB(255,255,255),RGB(0,0,0))","Column")

此程式碼放在 Grid 的 Init 事件中
作答、正解是指該 Column.ControlSource 各自所指定的欄位名稱

至於顏色就挑你自己喜歡的吧

thbstc · 註冊時間: 2004-03-09 文章: 6 第 8 樓

試得結果還是不管用,但是謝謝各位的幫助

syntech · 發表於: 星期五三月 12, 2004 8:44 am 文章主題:

如果只是照抄,大概也是不管用,
您應該把您試的方式或程式碼提出來,
讓大家看看

朱育興 · 發表於: 星期五三月 12, 2004 1:09 pm 文章主題:

小桑‧無痕 · 發表於: 星期五三月 12, 2004 4:56 pm 文章主題:

小桑‧無痕 · 發表於: 星期五三月 12, 2004 5:16 pm 文章主題:

thbstc...試試看剛剛為你寫的範例....你參考看看...
寫程式是要融會貫通...不可以照抄的....

「測試GRID001.exe」執行後會解開一個目錄，裡面又一個專案 DemoGrid，DemoGrid裡面有一個叫Grid的FORM，執行它。
先按「建立資料庫」，再按「Show1」，應該可以看到你要的結果。

thbstc · 註冊時間: 2004-03-09 文章: 6 第 13 樓

謝謝各位的指正，小弟定當恪守！
〔試得結果還是不管用,但是謝謝各位的幫助〕
我指的是呈現的結果，並非各位先進的程式指導不管用，語意描述有誤請見諒．

syntech · 發表於: 星期一三月 15, 2004 3:36 pm 文章主題:

很怪? 弄不清楚到底要什麼?

小桑‧無痕 · 發表於: 星期一三月 15, 2004 3:56 pm 文章主題: