|
VFP 愛用者社區 本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
|
上一篇主題 :: 下一篇主題 |
發表人 |
內容 |
wangeve
註冊時間: 2005-08-01 文章: 20
第 1 樓
|
發表於: 星期二 八月 30, 2005 11:53 am 文章主題: 從 Form1.init 呼叫Procedure ,却出錯!!! |
|
|
我在Form1中寫了一個程序p1,
這個p1程序的內容會操作Form1中的物件,
並且在Form1.init中呼叫它,這種情形下是OK的
但如果把它移到prg中,並且其中一個參數是傳Form.name,
一樣是在Form1.init呼叫它,但卻出現"物件Form1沒找到",
這是什麼原因啊,是因為整個Form還沒完全初始化的關係嗎?
或者還有其它方法可以做
|
|
回頂端 |
|
|
bin1x
註冊時間: 2004-08-27 文章: 462
第 2 樓
|
|
回頂端 |
|
|
wangeve
註冊時間: 2005-08-01 文章: 20
第 3 樓
|
發表於: 星期二 八月 30, 2005 1:52 pm 文章主題: |
|
|
真的看不懂裡面寫的是什麼,
請原諒我是個初學者
|
|
回頂端 |
|
|
Ruey
註冊時間: 2003-03-12 文章: 1698 來自: tunglo
第 4 樓
|
發表於: 星期二 八月 30, 2005 6:12 pm 文章主題: |
|
|
SET PROCEDURE TO 有沒有使用
代碼: | xx=Createobject("form1")
xx.Show
Read Events
Function test(tobject)
Messagebox(tobject.Name)
Endfunc
Define Class form1 As Form
Add Object button1 As Button
Function Init
test(Thisform)
Endfunc
Function Destroy
Clear Events
Endfunc
Enddefine
Define Class Button As CommandButton
Function Click
test(Thisform)
*thisform.release
Endfunc
Enddefine |
_________________ #############################
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!
學會VFP使用者社區的搜尋,Code才會更有趣~
############################# |
|
回頂端 |
|
|
wangeve
註冊時間: 2005-08-01 文章: 20
第 5 樓
|
發表於: 星期三 八月 31, 2005 11:17 am 文章主題: |
|
|
已經解決了,
只要換個位置呼叫就好了,
init--->show
|
|
回頂端 |
|
|
liangszpt
註冊時間: 2004-11-18 文章: 262 來自: 广东省深圳市
第 6 樓
|
發表於: 星期四 九月 01, 2005 5:32 pm 文章主題: |
|
|
事件触发顺序
请参阅
下表列出了当表单处于 READ 兼容性方式下,且表单集的 WindowType 属性设置为 2(读)或 3(读模式)时,Visual FoxPro 的事件触发顺序。数据环境的 AutoOpenTables 属性假定为“假”(.F.)。
对象 事件
表单集 Load
数据环境 BeforeOpenTables
表单 Load
数据环境临时表 Init
数据环境 Init
对象1 Init
表单集 ReadWhen
表单集 ReadActivate
表单集 ReadShow
表单集 Show
表单 Show
表单集 Activate
表单 Activate
对象2 When
表单 GotFocus
对象3 GotFocus
对象4 Valid
1 对每个对象,从最里面的对象到最外面的容器。
2 Tab 键次序中的第一对象。
3 如果 When 事件返回为“真”(.T.)。
4 当对象失去焦点时。 |
|
回頂端 |
|
|
|
|
您 無法 在這個版面發表文章 您 無法 在這個版面回覆文章 您 無法 在這個版面編輯文章 您 無法 在這個版面刪除文章 您 無法 在這個版面進行投票 您 無法 在這個版面附加檔案 您 無法 在這個版面下載檔案
|
|