VFP 愛用者社區

[小賴]

可能小賴弄錯了 ! 那來這二個屬性 ?
Grid1.Column? 有許多Dynamic****屬性
小賴只挑DynamicCurrentControl使用; 因為DynamicCurrentControl
機乎包含了Dynamic****所有功能加總; 就連如標題所列二屬性或其他沒有
Dynamic字頭的屬性都可於DynamicCurrentControl內完成(不單指Column
內的Text1, 其他物件Image ..等亦可)

方法 :

1. 自訂一Function或表單Method:
通常我都在FORM新增一Method：FormDynamic()
(不要跟小賴說這一步你不會... FORM -> New Method)

2. 將我們所謂Dynamic絛件寫在Function(或Method)中
ThisForm.FormDynamic() :


WITH ThisForm.Grid1.Column?.Text1
　　DO CASE
　　　　CASE 條件一
　　　　　　　.SelectedBackcolor = RGB(255,0,0)
　　　　CASE 條件二
　　　　　　　.SelectedBackcolor = RGB(0,255,0)
　　　　CASE 條件三
　　　　　　　.SelectedBackcolor = RGB(0,0,255)
　　　　OTHERWISE
　　　　　　　.SelectedBackcolor = RGB(255,0,255)
　　ENDCASE
ENDWITH

以上讓Grid指標位於Column?時會根據你給的絛件顯示不同顏色
(條件可任意給, 沒必要一定與Column?欄位有關)


當然你也可組合一堆其他屬性如

WITH ThisForm.Grid1.Column?.Text1
　　DO CASE
　　　　CASE 條件一
　　　　　　　.SelectedBackcolor = RGB(255,0,0)
　　　　　　　.SelectedForecolor = RGB(255,160,0)
　　　　　　　.Forecolor = RGB(255,160,0)
　　　　　　　.FontBold = RGB(255,160,0)
　　　　CASE 條件二
　　　　　　　．
　　　　　　　．
ENDWITH

我說了DynamicCurrentControl機乎包含了Dynamic****所有功能加總　

3. 將Column?.DynamicCurrentControl屬性設定如下：

="ThisForm.FormDynamic()"


4. 最後記得Column?.Sparse = .F.