| 上一篇主題 :: 下一篇主題   | 
	
	
	
		| 發表人 | 
		內容 | 
	
	
		wangeve
 
 
  註冊時間: 2005-08-01 文章: 20
 
  第 1 樓
  | 
		
			
				 發表於: 星期一 八月 29, 2005 2:22 pm    文章主題: 請教關於ON KEY LABEL的問題 | 
				     | 
			 
			
				
  | 
			 
			
				在我的FORM上需要設一些快速鍵,我在init是這麼設的
 
on key label ctrl+D do procedurename
 
 
現在我需要在run完procedurename,再處理一些form上的物件,
 
請問要如何做呢 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		garfield Site Admin
  
  註冊時間: 2003-01-30 文章: 2160
 
  第 2 樓
  | 
		
			
				 發表於: 星期一 八月 29, 2005 10:18 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				可能是這樣做吧! (因為我沒實驗過)
 
on key label ctrl+D do procedurename with thisform
 
 
...
 
proc procedurename
 
lpara mobj
 
? '這是form的name:',mobj.name
 
 
**** _________________ 利用>>搜尋<<的功能會比問的還要快得到答案. | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		wangeve
 
 
  註冊時間: 2005-08-01 文章: 20
 
  第 3 樓
  | 
		
			
				 發表於: 星期二 八月 30, 2005 9:17 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				這個方法不行,
 
會出現 "THISFORM只能在方法程序中使用"的訊息,
 
不知道還有沒有其他的方法
 
 
          | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		bin1x
 
 
  註冊時間: 2004-08-27 文章: 462
 
  第 4 樓
  | 
		
			
				 發表於: 星期二 八月 30, 2005 9:57 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				若是按程序性來講
 
語意中run 完了
 
由上而下的程序完了
 
自然就return 回去了
 
再說
 
在物件的init 設on key label 
 
以init 來講的話,當form 形成時,執行一次init
 
進入到form所屬的物件再一次init ?
 
on key label可以重覆用很多次啦
 
好像也應該考慮push key 和 pop key
 
如果是這樣的話
 
with .....
 
end with   
 
引用物件的語法是.....
 
this
 
或是
 
thisform
 
再來就是上面那個了 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		garfield Site Admin
  
  註冊時間: 2003-01-30 文章: 2160
 
  第 5 樓
  | 
		
			
				 發表於: 星期二 八月 30, 2005 10:12 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				用這類的方法是可行的,
 
如果實務上執行有問題,
 
應該換個方式來做看看,
 
或許像你這樣情形,
 
電腦不能用thisform , 那就該用public 變數 來取代 thisform
 
你想想應該就明瞭. _________________ 利用>>搜尋<<的功能會比問的還要快得到答案. | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		wangeve
 
 
  註冊時間: 2005-08-01 文章: 20
 
  第 6 樓
  | 
		
			
				 發表於: 星期二 八月 30, 2005 10:54 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				依garfield的方法做,已經解決了,謝謝
 
 
         | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		 |