| 上一篇主題 :: 下一篇主題   | 
	
	
	
		| 發表人 | 
		內容 | 
	
	
		TSAISUN
 
 
  註冊時間: 2006-02-12 文章: 12
 
  第 1 樓
  | 
		
			
				 發表於: 星期一 七月 31, 2006 7:44 am    文章主題: 隱藏預灠列印工具條 | 
				     | 
			 
			
				
  | 
			 
			
				各位前輩,自訂表單給預灠列印用,如何隱藏預灠列印工具條
 
謝謝 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		Ruey
 
 
  註冊時間: 2003-03-12 文章: 1698 來自: tunglo
  第 2 樓
  | 
		
			
				 發表於: 星期一 七月 31, 2006 2:07 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				在報表 on entry寫入下面一段
 
 
			*使列印預覽工具列停靠在功能表欄下
 
			If Wexist(lag("預覽列印")) And Wlrow(lag("預覽列印"))>=0
 
 
				lc_Run="Move Window '"+lag("預覽列印")+"' To 0,0"
 
				&lc_Run
 
			
 
			lc_Run="Deactivate Window '"+lag("預覽列印")+"'"
 
				&lc_Run
 
			Endif _________________ #############################
 
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!
 
 
學會VFP使用者社區的搜尋,Code才會更有趣~
 
############################# | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		Ruey
 
 
  註冊時間: 2003-03-12 文章: 1698 來自: tunglo
  第 3 樓
  | 
		
			
				 發表於: 星期一 七月 31, 2006 4:47 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				我不知道6.0
 
我用9.0 報表點選表頭 _________________ #############################
 
快樂媽咪系列幸福宅配,喝十全雞湯~原來幸福那麼簡單!!
 
 
學會VFP使用者社區的搜尋,Code才會更有趣~
 
############################# | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		garfield Site Admin
  
  註冊時間: 2003-01-30 文章: 2160
 
  第 4 樓
  | 
		
			
				 發表於: 星期一 七月 31, 2006 6:58 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				不知是否可以用 report 的 data Environment 的 .init() 
 
來代表 on entry _________________ 利用>>搜尋<<的功能會比問的還要快得到答案. | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		goto-dream
 
 
  註冊時間: 2004-05-11 文章: 909
 
  第 5 樓
  | 
		 | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		janlih
 
 
  註冊時間: 2003-11-04 文章: 69
 
  第 6 樓
  | 
		
			
				 發表於: 星期三 二月 07, 2007 5:01 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				 	  | Ruey 寫到: | 	 		  在報表 on entry寫入下面一段
 
 
			*使列印預覽工具列停靠在功能表欄下
 
			If Wexist(lag("預覽列印")) And Wlrow(lag("預覽列印"))>=0
 
 
				lc_Run="Move Window '"+lag("預覽列印")+"' To 0,0"
 
				&lc_Run
 
			
 
			lc_Run="Deactivate Window '"+lag("預覽列印")+"'"
 
				&lc_Run
 
			Endif | 	  
 
 
請問 lag("預覽列印") ==> lag()函數功能是什麼? | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		chioucy
 
 
  註冊時間: 2004-05-26 文章: 33
 
  第 7 樓
  | 
		
			
				 發表於: 星期五 二月 09, 2007 1:53 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				VFP 6.0 可在報表設計工具畫面中 點選頁標題 於『執行運算式』進入點輸入
 
取消預覽列印工具列() 並在主程式中加入以下函數即可
 
 
 
FUNCTION 取消預覽列印工具列
 
 
If Wexist("預覽列印")
 
	IF  Wlrow("預覽列印")>=0 
 
		lc_Run="Move Window '"+"預覽列印"+"' To 0,0" 
 
		&lc_Run 
 
	ENDIF
 
	lc_Run="Deactivate Window '"+"預覽列印"+"'" 
 
	&lc_Run 
 
Endif
 
 
ENDFUNC | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		215001
 
 
  註冊時間: 2003-06-11 文章: 393
 
  第 8 樓
  | 
		
			
				 發表於: 星期五 二月 09, 2007 2:18 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				我依照上面的作法
 
1.在VFP環境下,是可以隱藏預覽工具列,可是Compile後,在EXE下,還是會show出預覽工具列
 
2.報表有沒有辦法只可以預覽,而不可以列印(最好是保留預覽工具列下,只關閉列印功能,因為還要能上一頁,下一頁) | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		ERIC
 
 
  註冊時間: 2006-11-27 文章: 45
 
  第 9 樓
  | 
		
			
				 發表於: 星期五 二月 09, 2007 10:55 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				1.那方法是可行的
 
2.那方法会移走列印工具列欧 _________________ 學無止境!互相勉勵吧∼
 
 
有需要學習VFP的新手.可以找我!! | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		 |