  | 
				VFP 愛用者社區 本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.   
				 | 
			 
		 
		 
	
		| 上一篇主題 :: 下一篇主題   | 
	 
	
	
		| 發表人 | 
		內容 | 
	 
	
		480615
 
 
  註冊時間: 2008-04-11 文章: 93
 
  第 1 樓
  | 
		
			
				 發表於: 星期一 一月 31, 2011 10:59 am    文章主題: vfp调用SetLocalTime的自定义函数十进制转二进制为何要除256或取模256 | 
				     | 
			 
			
				
  | 
			 
			
				DECLARE Short SetLocalTime IN WIN32API String SYSTEMTIME
 
 
nYear=2004
 
nMonth=4
 
nWeek=1     &&2004年4月12日为星期一
 
nDay=12
 
nHour=20
 
nMinute=31
 
nSecond=0
 
nMilliseconds=0
 
 
cBuffer=DecToHex(nYear)+DecToHex(nMonth)+DecToHex(nWeek)+DecToHex(nDay)+;  &&建立结构字符串
 
    DecToHex(nHour)+DecToHex(nMinute)+DecToHex(nSecond)+DecToHex(nMilliseconds)
 
 
nResult=SetLocalTime(cBuffer)
 
 
IF nResult#0
 
    =MESSAGEBOX("设置成功!")
 
ELSE 
 
    =MESSAGEBOX("操作失败!")
 
ENDIF 
 
 
FUNCTION DecToHex     &&返回2字节的字符串
 
    LPARAMETERS tnNumber
 
    cHex=CHR(MOD(tnNumber,256))+CHR(INT(tnNumber/256))   
 
RETURN cHex
 
ENDFUNC | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		LiuRambo
 
 
  註冊時間: 2007-11-27 文章: 481
 
  第 2 樓
  | 
		
			
				 發表於: 星期一 一月 31, 2011 10:00 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				這位兄台提問的問題好"哲學"啊
 
 
如果不是錯誤訊息
 
這類問題大概只有創作者能說出"為什麼要這麼寫" | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		syntech
 
 
  註冊時間: 2003-05-16 文章: 4252 來自: Taipei,Taiwan
  第 3 樓
  | 
		
			
				 發表於: 星期二 二月 01, 2011 12:19 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				Big Endian / Little Endian
 
 
 
====
 
很多FOXPRO 使用者不是正統計算機科學出身的,
 
我也是. _________________ 如果公司有下列困擾:
 
1. 找不到便宜,快速,簡易的 生產排程軟體
 
2. 不知道如何快速排定 採購計劃
 
3. 成本抓不準,自己算比軟體算有用
 
4. 想學習系統規劃,想找系統架構的顧問
 
 
請聯絡我們,也許我們幫得上忙 | 
			 
		  | 
	 
	
		| 回頂端 | 
		 | 
	 
	
		  | 
	 
	
		 | 
	 
 
  
  	 
	    
  	   | 
 	
您 無法 在這個版面發表文章 您 無法 在這個版面回覆文章 您 無法 在這個版面編輯文章 您 無法 在這個版面刪除文章 您 無法 在這個版面進行投票 您 無法 在這個版面附加檔案 您 無法 在這個版面下載檔案
  | 
   
  
		 |