您所在位置：主题：[原创]表格控件的問題
GEORGECHIN
[专家分：440] 发布于 2010-06-27 07:21:00
表格(GRID)中某列在光標移動時,要檢測光標所在列的值,不同的值,當列的控件需要更改.如:當列值是新增進來的,其當列的控件要改為下拉式列表框(COLUMN.CURRENTCONTROL=COMBO),如果是編輯,則控件要改為文本框(COLUMN.CURRENTCONTROL=TEXT).以上的要求,我把代碼是寫在GRID.AFTERROWCOLCHANGE中的,問題來了:
1.當第一次運行表單時,這個功能可以達成.
2.當我連續用此表單時,即上一個修改動作完成已經存檔,再次進行修改動作(注意,在表單沒有釋放的情況下再次使用),這時,改變表格列的當前控件,其控件竟然變為不可用!哪怕我怎麼改屬性,都無濟於事.
GRID.AFTERROWCOLCHANGE代碼如下
LOCA FOR USERID=DD
IF FOUND()=.T.
THIS.COLUMN1.CURRENTCONTROL="TEXT1"
THIS.COLUMN1.READONLY=.T.
ELSE
THIS.COLUMN1.CURRENTCONTROL="COMBO1"
THIS.COLUMN1.READONLY=.F.
ENDI
THIS.REFRESH
RETU
以上請各位朋友指點,謝謝!
1.當第一次運行表單時,這個功能可以達成.
2.當我連續用此表單時,即上一個修改動作完成已經存檔,再次進行修改動作(注意,在表單沒有釋放的情況下再次使用),這時,改變表格列的當前控件,其控件竟然變為不可用!哪怕我怎麼改屬性,都無濟於事.
GRID.AFTERROWCOLCHANGE代碼如下
LOCA FOR USERID=DD
IF FOUND()=.T.
THIS.COLUMN1.CURRENTCONTROL="TEXT1"
THIS.COLUMN1.READONLY=.T.
ELSE
THIS.COLUMN1.CURRENTCONTROL="COMBO1"
THIS.COLUMN1.READONLY=.F.
ENDI
THIS.REFRESH
RETU
以上請各位朋友指點,謝謝!