| 上一篇主題 :: 下一篇主題   | 
	
	
	
		| 發表人 | 
		內容 | 
	
	
		Batman
 
 
  註冊時間: 2003-11-15 文章: 348
 
  第 1 樓
  | 
		
			
				 發表於: 星期二 六月 26, 2012 5:50 pm    文章主題: 請教Shortcut Menu的問題 | 
				     | 
			 
			
				
  | 
			 
			
				x='abc'
 
DEFINE POPUP Test MARGIN SHORTCUT
 
ON SELECTION POPUP Test Do popSelect with X
 
 
在popSelect 裡
 
 
Para y
 
Wait wind y---->結果在popup菜單中選出來是數字, 而不是'abc'
 
 
請問狐友知不知道為什麼, 謝覆 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		ckp6250
 
 
  註冊時間: 2004-07-30 文章: 1645
 
  第 2 樓
  | 
		
			
				 發表於: 星期三 六月 27, 2012 9:57 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				先試看看 ON SELECTION POPUP Test Do popSelect with 'abc'
 
出來的結果是什麼? | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		Batman
 
 
  註冊時間: 2003-11-15 文章: 348
 
  第 3 樓
  | 
		
			
				 發表於: 星期三 六月 27, 2012 11:32 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				| 出來是正常, 即'abc', 用了變數便不可了 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		ckp6250
 
 
  註冊時間: 2004-07-30 文章: 1645
 
  第 4 樓
  | 
		
			
				 發表於: 星期三 六月 27, 2012 5:28 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				那就很明顥了,
 
您的X變數被改變了
 
 
在x='abc' 的上一行
 
先加上
 
Local x
 
試看看 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		Batman
 
 
  註冊時間: 2003-11-15 文章: 348
 
  第 5 樓
  | 
		
			
				 發表於: 星期三 六月 27, 2012 6:31 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				| 測試過, 不關加上Local x 的問題, 我將 Do popSelect with x 獨立執行是沒問題, 但放在ON SELECTION POPUP Test Do popSelect with X 便出現3位數的數字, 也不是何來及什麼意義 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		Batman
 
 
  註冊時間: 2003-11-15 文章: 348
 
  第 6 樓
  | 
		
			
				 發表於: 星期三 六月 27, 2012 7:34 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				| 改用全域變數解決了 _Screen.x | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		ckp6250
 
 
  註冊時間: 2004-07-30 文章: 1645
 
  第 7 樓
  | 
		
			
				 發表於: 星期四 六月 28, 2012 8:25 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				恭喜您找到解決方法
 
但,我還是認為,跟全域變解數沒有任何關係,
 
比如我的程式
 
ON SELECTION BAR 18 OF 啟動 RunProg("Do Form &systempath\screen\傳送電子郵件 With '傳送檔案',User_Name")
 
 
也用到變數,但執行仍然正常 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		syntech
 
 
  註冊時間: 2003-05-16 文章: 4252 來自: Taipei,Taiwan
  第 8 樓
  | 
		
			
				 發表於: 星期四 六月 28, 2012 9:26 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				看起來應該還是在某處變動過了,
 
 
除非每次都用超複雜的變數命名,加上嚴格的變數控制,
 
否則可能還是會遇到不知道哪邊又改過了
 
 
FOXPRO的變數可視性與其他工具是很不一樣的. _________________ 如果公司有下列困擾:
 
1. 找不到便宜,快速,簡易的 生產排程軟體
 
2. 不知道如何快速排定 採購計劃
 
3. 成本抓不準,自己算比軟體算有用
 
4. 想學習系統規劃,想找系統架構的顧問
 
 
請聯絡我們,也許我們幫得上忙 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		小賴
 
 
  註冊時間: 2004-12-27 文章: 477
 
  第 9 樓
  | 
		
			
				 發表於: 星期四 六月 28, 2012 10:38 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				會不會作用工作區有FieldName為X之欄位
 
改一下變數名稱試試 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		Batman
 
 
  註冊時間: 2003-11-15 文章: 348
 
  第 10 樓
  | 
		
			
				 發表於: 星期五 六月 29, 2012 9:21 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				[quote="ckp6250"]恭喜您找到解決方法
 
但,我還是認為,跟全域變解數沒有任何關係,
 
比如我的程式
 
ON SELECTION BAR 18 OF 啟動 RunProg("Do Form &systempath\screen\傳送電子郵件 With '傳送檔案',User_Name")
 
 
也用到變數,但執行仍然正常[/quote]
 
 
on selection bar 是沒問題, on selection popup 才出現, 我懷疑因shortcut popup是可以任何地方出現, 所以如要用變數, 便要用全域, 而Bar不同, bar是在已知的Popup | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		ckp6250
 
 
  註冊時間: 2004-07-30 文章: 1645
 
  第 11 樓
  | 
		
			
				 發表於: 星期五 六月 29, 2012 11:42 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				您試一下這段程式好了, 這是由 vfp 的 help 中抄來的1
 
 
 	  | 代碼: | 	 		  
 
Clear
 
X='abc'
 
Activate Screen
 
Define Popup popFruits From 5,5 ;
 
   MULTISELECT Margin            && «O¥s|h-«¿i¶μ¥\‾aai
 
Define Bar 1 Of popFruits ;
 
   PROMPT '\<Apples'  Mark Chr(3)    && 2A¤@-O¿i¶μ
 
Define Bar 2 Of popFruits ;
 
   PROMPT '\<Bananas' Mark Chr(4)    && 2A¤G-O¿i¶μ
 
Define Bar 3 Of popFruits ;
 
   PROMPT '\<Grapes'  Mark Chr(5) && 2A¤T-O¿i¶μ
 
Define Bar 4 Of popFruits ;
 
   PROMPT '\<Lemons'  Mark Chr(6)    && 2A¥|-O¿i¶μ
 
 
On Selection Popup popFruits Do yourchoice With X    && Choice ±`|!
 
Activate Popup popFruits
 
 
Procedure yourchoice            && ·i3B2z choice cO°o|aao
 
   Parameters Y
 
   Messagebox(Y)
 
   Return
 
 | 	 
  | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		Batman
 
 
  註冊時間: 2003-11-15 文章: 348
 
  第 12 樓
  | 
		
			
				 發表於: 星期五 六月 29, 2012 8:41 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				| 謝謝ckp6250狐友多次幫助, 我測試了你給我的程式, 是沒問題, 可以出來'abc', 但我將它放入我的程式又不行了, 又是出現數字, 不過有一點我漏說, 我是放到Treeview Control, 不知是不是會有影響 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		ckp6250
 
 
  註冊時間: 2004-07-30 文章: 1645
 
  第 13 樓
  | 
		
			
				 發表於: 星期五 六月 29, 2012 9:08 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				| 不管您放到那裡, 都不是 vfp 的問題 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		 |