 |
VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
|
| 上一篇主題 :: 下一篇主題 |
| 發表人 |
內容 |
215001
註冊時間: 2003-06-11
文章: 396
第 1 樓
|
 發表於: 星期日 八月 09, 2026 11:48 pm 文章主題: 當Grid唯讀時,另外加入的Edit1控制項,無法正常顯示背景色 |
 |
|
請教各位:
我的表單中有一個 Grid
當Grid 可編輯時.客戶編號 及 備註 的背景色 都是綠色的 --------正常
但是當Grid 設成唯讀時,備註 的背景色 卻是顯示白色的 --------------不正常
該如何解決 ?
程式碼如下:
| 代碼: |
With Thisform.grid1
.columncount=2
.columns(1).header1.CAPTION="客戶編號"
.columns(1).CONTROLSOURCE="cust.custno"
.columns(1).WIDTH= 80
.columns(2).RemoveObject('Text1')
.columns(2).AddObject('Edit1','Editbox')
.columns(2).currentcontrol="Edit1"
.columns(2).sparse=.F.
.columns(2).edit1.BorderStyle = 0
.columns(2).edit1.Visible=.T.
.columns(2).header1.CAPTION="備註"
.columns(2).CONTROLSOURCE="cust.note"
.columns(2).WIDTH= 300
.setall("DynamicBackColor","RGB(0,255,0)","Column")
.readonly=.T.
EndWith
|
|
|
| 回頂端 |
|
 |
CPS0204
註冊時間: 2014-08-24
文章: 531
第 2 樓
|
| 發表於: 星期一 八月 10, 2026 8:42 am 文章主題: |
|
|
ai回答如下:
🛡️ 總結建議
只要在 AddObject('Edit1', 'Editbox') 之後，補上這兩行：
程式碼片段
.columns(2).edit1.BackStyle = 0 && 設為透明
.columns(2).edit1.DisabledBackColor = RGB(0, 255, 0) && 唯讀時顯示綠色 |
|
| 回頂端 |
|
|
215001
註冊時間: 2003-06-11
文章: 396
第 3 樓
|
| 發表於: 星期一 八月 10, 2026 9:11 am 文章主題: |
|
|
感謝 CPS0204
加上:
.columns(2).edit1.BackStyle = 0 && 設為透明
解決了 |
|
| 回頂端 |
|
|
|
|
您 無法 在這個版面發表文章
您 無法 在這個版面回覆文章
您 無法 在這個版面編輯文章
您 無法 在這個版面刪除文章
您 無法 在這個版面進行投票
您 無法 在這個版面附加檔案
您 無法 在這個版面下載檔案
|
|
常見問題
搜尋
會員列表
會員群組
會員註冊
個人資料
登入檢查您的私人訊息
登入
