|
VFP 愛用者社區 本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
|
上一篇主題 :: 下一篇主題 |
發表人 |
內容 |
yctsai
註冊時間: 2003-04-11 文章: 179
第 1 樓
|
發表於: 星期一 四月 14, 2003 11:32 pm 文章主題: 另一個疑問? |
|
|
請教一下,如果grid這個物件所對應的recordsource是在runtime時期,由create sql view而來的,因此第一次create sql view時grid內,所寫的程式碼均可正常執行,但第二次create sql view時,似乎grid所寫的程式碼就沒反應,好像成了預設值,不存在一樣,是哪裡的問題?? thanks |
|
回頂端 |
|
|
garfield Site Admin
註冊時間: 2003-01-30 文章: 2157
第 2 樓
|
發表於: 星期二 四月 15, 2003 7:46 am 文章主題: |
|
|
只要一變動 grid的recordsource , 它的columns的ControlSource會自動依欄位順序重填, 所以我都是在FORM設計的時候就定義好, 在變動 grid的recordsource 之前先將所有的Columns資料存起來, 等變動好了ReconrdSource再將columns的資料一個一個的回存, 就不會出問題了. |
|
回頂端 |
|
|
ICTANG
註冊時間: 2003-03-18 文章: 11 來自: Taipei
第 3 樓
|
發表於: 星期二 四月 15, 2003 10:44 am 文章主題: |
|
|
實作上應是:
1.FORM上產生1個PROPERTY:GRIDARR[]
WITH THISFORM
.LOCKSCREEN=.T.
DECLARE .GRIDARR[THIS.MYGRID.COLUMNCOUNT]
FOR II=1 TO .MYGRID.COLUMNCOUNT
.GRIDARR[II]=.MYGRID.COLUMNS[II].CONTROLSOURCE
NEXT II
.MYGRID.RECORDSOURCE=''
**CREATE NEW VIEW : VIEWCURSOR
.....
.MYGRID.RECORDSOURCE='VIEWCURSOR'
FOR II=1 TO .MYGRID.COLUMNCOUNT
.MYGRID.COLUMNS[II].CONTROLSOURCE=.GRIDARR[II]
NEXT II
.LOCKSCREEN=.F.
ENDWITH |
|
回頂端 |
|
|
yctsai
註冊時間: 2003-04-11 文章: 179
第 4 樓
|
發表於: 星期二 四月 15, 2003 4:11 pm 文章主題: |
|
|
謝謝,努力中,或許grid應該再聰明一點 |
|
回頂端 |
|
|
張得子
註冊時間: 2003-04-28 文章: 15
第 5 樓
|
發表於: 星期五 五月 02, 2003 5:30 pm 文章主題: |
|
|
既然用動態方式產生view,何不也用動態方式產Grid |
|
回頂端 |
|
|
garfield Site Admin
註冊時間: 2003-01-30 文章: 2157
第 6 樓
|
發表於: 星期五 五月 02, 2003 6:43 pm 文章主題: Re: 另一個疑問? |
|
|
yctsai 寫到: | 請教一下,如果grid這個物件所對應的recordsource是在runtime時期,由create sql view而來的,因此第一次create sql view時grid內,所寫的程式碼均可正常執行,但第二次create sql view時,似乎grid所寫的程式碼就沒反應,好像成了預設值,不存在一樣,是哪裡的問題?? thanks |
請參考這個回答
http://vfp.sunyear.com.tw/viewtopic.php?t=77 _________________ 利用>>搜尋<<的功能會比問的還要快得到答案. |
|
回頂端 |
|
|
Ruey
註冊時間: 2003-03-12 文章: 1698 來自: tunglo
第 7 樓
|
發表於: 星期六 五月 03, 2003 9:31 am 文章主題: |
|
|
1.按照Garfield所給的,這不能用在SPT方式上
with thisform.pgf1.page2.grid1
.recordsource='select * from cust where cust_no<"'+padr(thisform.text1.value,+'" into cursor zzz'
.recordsourcetype=4
endwith
2.ICTANG 可以簡化
1.FORM上
WITH THISFORM
.LOCKSCREEN=.T.
.MYGRID.RECORDSOURCE=''
**CREATE NEW VIEW : VIEWCURSOR
.....
.MYGRID.RECORDSOURCE='VIEWCURSOR'
.LOCKSCREEN=.F.
ENDWITH
THISFORM.MYGRID.SETFOCUS() _________________ #############################
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!
學會VFP使用者社區的搜尋,Code才會更有趣~
############################# |
|
回頂端 |
|
|
|
|
您 無法 在這個版面發表文章 您 無法 在這個版面回覆文章 您 無法 在這個版面編輯文章 您 無法 在這個版面刪除文章 您 無法 在這個版面進行投票 您 無法 在這個版面附加檔案 您 無法 在這個版面下載檔案
|
|