| 上一篇主題 :: 下一篇主題   | 
	
	
	
		| 發表人 | 
		內容 | 
	
	
		nh8287
 
  
  註冊時間: 2007-06-11 文章: 30
 
  第 1 樓
  | 
		
			
				 發表於: 星期五 八月 17, 2007 9:43 am    文章主題: 請問 Vfp [WAIT 命令] 的設定? | 
				     | 
			 
			
				
  | 
			 
			
				通常顯示一個訊息並暫停 Visual FoxPro 的執行,直到使用者按任意一個鍵或按一下滑鼠為止。
 
 
WAIT [cMessageText] [TO VarName] [WINDOW [AT nRow, nColumn]] [NOWAIT]
 
   [CLEAR | NOCLEAR] [TIMEOUT nSeconds]
 
 
如: WAIT DATE() WINDOW AT 20,20 TIMEOUT 2
 
 
如何設定 WAIT DATE() WINDOW AT 螢幕正中間...?
 
如何測出 nRow, nColumn
 
 
請知道的大大求助,感謝...! | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		garfield Site Admin
  
  註冊時間: 2003-01-30 文章: 2160
 
  第 2 樓
  | 
		
			
				 發表於: 星期五 八月 17, 2007 11:06 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				要顯示在畫面中間的功能,
 
通常會用messagebox() _________________ 利用>>搜尋<<的功能會比問的還要快得到答案. | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		jaime47
 
 
  註冊時間: 2003-03-26 文章: 14 來自: Taiwan
  第 3 樓
  | 
		
			
				 發表於: 星期五 八月 17, 2007 11:47 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				請使用下列方法試試看:
 
 
WAIT [cMessageText] [TO VarName] [WINDOW [AT (SRow()-MemLines(cMessageText))/2, (SCols()-Len(cMessageText))/2]] [NOWAIT] [CLEAR | NOCLEAR] [TIMEOUT nSeconds]
 
 
如: WAIT DATE() WINDOW AT (SROW()-MEMLINES(DATE()))/2, (SCOLS()-LEN(DATE()))/2 TIMEOUT 2 _________________ Jaime Tsao | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		nh8287
 
  
  註冊時間: 2007-06-11 文章: 30
 
  第 4 樓
  | 
		
			
				 發表於: 星期五 八月 17, 2007 12:40 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				知道了大大,感謝 Jaime Tsao ...!   
 
 
測試 WAIT DATE() WINDOW AT (SROW()-MEMLINES(DTOS(date())))/2, (SCOLS()-LEN(DTOS(date())))/2 TIMEOUT 2
 
 
已經 OK...!   | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		nh8287
 
  
  註冊時間: 2007-06-11 文章: 30
 
  第 5 樓
  | 
		
			
				 發表於: 星期五 八月 17, 2007 1:27 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				這樣寫更貼切...!
 
 
LOCAL msg
 
msg='今天日期='+DTOC(DATE())
 
WAIT msg WINDOW AT (SROW()-MEMLINES(msg))/2, (SCOLS()-LEN(msg))/2 TIMEOUT 3
 
 
感謝 Jaime Tsao ...!    | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		 |