VFP 愛用者社區

[chou min sung]

如何把grid中，目前停留的該筆記錄底色設為紅色？

[小桑•無痕]

搜尋一下..可以找到你要的答案...

[小賴]

Grid 指標看到的顏色是
Grid1.Column(i).Text1的SelectedBackColor
輸入時看到的顏色為
Grid1.Column(i).Text1的BackColor

如果於Grid.INIT 設定

FOR i = 1 TO This.ColumnCount
This.Columns(i).Text1.BackColor = RGB(255,0,0)
This.Columns(i).Text1.SelectedBackColor = RGB(255,255,0)
NEXT

停留的指標顏色為黃色, 輸入資料時則為紅色底色

[chou min sung]

那如果要一整列都是紅色底色呢？

[小賴]

那更簡單了; 只要設定Grid
HighLightStyle = 1
HighLightBackColor = RGB(255,0,0)
即可

[chou min sung]

偶素6.0的版本，好像沒有這個指令

有其他的代替方法嗎？

[garfield]

老掉牙的問題,

[小賴]

1. ThisForm 新增屬性 CurrentRec &&儲存目前RECNO()
2. Grid1.AfterRowColumnChange :

ThisForm.CurrentRec = RECNO()
This.Refresh

3. Grid1.Init :
This.SetAll("DynamicBackColor", "IIF(ThisForm.CurrentRec = RECNO(), RGB(255, 0, 0), RGB(255,255,255))", "Column")