上一篇主題 :: 下一篇主題 |
發表人 |
內容 |
kmkna1103
註冊時間: 2008-05-08 文章: 119 來自: 台灣
第 1 樓
|
發表於: 星期一 六月 30, 2014 10:47 am 文章主題: addobject checkbox 無法點 |
|
|
thisform.GRID1.COLUMNCOUNT=2
thisform.GRID1.ReadOnly=.F.
WITH THISFORM.GRID1.COLUMN1
.Width = 100
ENDWITH
WITH THISFORM.GRID1.COLUMN2
.ControlSource = SELETMP.CHK
.RemoveObject("Text1")
.AddObject("Check1","checkbox")
.CurrentControl="Check1"
.Check1.Caption=""
.Width = 24
.Sparse=.F.
.ReadOnly=.F.
.Visible=.T.
.Check1.READONLY=.F.
ENDWITH
SELECT SELETMP
APPEND BLANK
如果用視覺化的方法可以點,請問我有什麼地方沒有設定到嗎? |
|
回頂端 |
|
 |
nelsonchuang
註冊時間: 2003-09-04 文章: 563 來自: 臺灣
第 2 樓
|
發表於: 星期一 六月 30, 2014 11:42 am 文章主題: |
|
|
enabled有設定了嗎? _________________ 大家好,請多指教 |
|
回頂端 |
|
 |
kmkna1103
註冊時間: 2008-05-08 文章: 119 來自: 台灣
第 3 樓
|
發表於: 星期一 六月 30, 2014 1:42 pm 文章主題: |
|
|
應該是說點下去不會打勾~enabled設定成.T.也是一樣的問題 |
|
回頂端 |
|
 |
oldbb
註冊時間: 2007-02-28 文章: 83
第 4 樓
|
發表於: 星期一 六月 30, 2014 2:21 pm 文章主題: |
|
|
.ControlSource = "SELETMP.CHK" |
|
回頂端 |
|
 |
kmkna1103
註冊時間: 2008-05-08 文章: 119 來自: 台灣
第 5 樓
|
發表於: 星期一 六月 30, 2014 2:34 pm 文章主題: |
|
|
感謝,小細節沒注意到 |
|
回頂端 |
|
 |
|