上一篇主題 :: 下一篇主題 |
發表人 |
內容 |
lester8888
註冊時間: 2014-08-11 文章: 45
第 1 樓
|
發表於: 星期一 三月 07, 2016 5:02 pm 文章主題: 表單內呼叫副程式 |
|
|
請教各先進,在表單內如何執行副程式(procdure)..謝謝! |
|
回頂端 |
|
|
55812296
註冊時間: 2012-09-19 文章: 49
第 2 樓
|
發表於: 星期一 三月 07, 2016 5:28 pm 文章主題: |
|
|
副程式名 1234.prg
do 1234
表單內無論是事件或程序 都不可有procdure |
|
回頂端 |
|
|
perry
註冊時間: 2014-07-20 文章: 203
第 3 樓
|
發表於: 星期一 三月 07, 2016 5:35 pm 文章主題: |
|
|
代碼: |
define class form1 as form
proc testaaa
wait wind 'testaaa' timeout 6
endproc
endfine
proc testbbb
wait wind 'testbbb' timeout 6
endproc
此 testaaa 如同表單 Event
thisform.testaaa() &&有無()均可,()用來傳參數的!!
而 testbbb 屬外部�{式要用
do testbbb or =testbbb()
只能往下繼承使用!!
|
而執行獨立 .prg 則無繼承問題
另外好像有一種特別用法...
testddd.prg
代碼: |
proc testddd
wait wind 'testddd' timeout 5
endproc
proc testeee
wait wind 'testeee' timeout 5
endproc
proc testfff
wait wind 'testfff' timeout 5
endproc
do testddd
do testeee in testddd
|
|
|
回頂端 |
|
|
CPS0204
註冊時間: 2014-08-24 文章: 441
第 4 樓
|
發表於: 星期一 三月 07, 2016 8:28 pm 文章主題: |
|
|
先建一個form 的(新方法程序),例: new_proc
然後在此form的command1.click 事件上
寫: =thisform.new_proc()
就可重覆呼叫本表單的子 程序或function (NEW_PROC) |
|
回頂端 |
|
|
|