Au3中文内码转换UDF，方便调用

10月62018

Au3中文内码转换UDF，方便调用

作者：绿色风发布：2018-10-6 9:54 Saturday 分类：源码示例阅读：5527次评论：0条

转载的 ACN [3mile] 的作品

暂时实现
BIG5=>GBK
GBK=>BIG5
GBK=>GB2312
GB2312=>GBK

```

#include <winapi.au3>

Local $sInputText = '中华人民共和国'
$fan=_JianToFan($sInputText)
MsgBox(0,'简转繁：',$fan)
$jian=_FanToJian($sInputText)
MsgBox(0,'繁转简：',$jian)
$big5=_GbkToBig5($fan)
MsgBox(0,'转大五：',$big5)
$gbk=_Big5toGbk($big5)
MsgBox(0,'转GBK：',$gbk)
$jian=_FanToJian($gbk)
MsgBox(0,'繁转简：',$jian)

Func _Big5toGbk(ByRef $sInputText);BIG5转GBK
    $sInputText = _WinAPI_MultiByteToWideChar($sInputText, 950, $MB_COMPOSITE, False);转为繁体中文
    $sInputText = _WinAPI_WideCharToMultiByte($sInputText, 936);转为GBK繁体中文
    Return $sInputText
EndFunc   ;==>_Big5toGbk

Func _GbkToBig5($sInputText);GBK转BIG5
    $sInputText = _WinAPI_MultiByteToWideChar($sInputText, 936, $MB_COMPOSITE, False);转为繁体中文
    $sInputText = _WinAPI_WideCharToMultiByte($sInputText, 950);转为GBK繁体中文
    Return $sInputText
EndFunc

Func _JianToFan($sInputText);GB2312转GBK
Local $InPtr = _WinAPI_MultiByteToWideChar($sInputText, 936, $MB_COMPOSITE, False)
Local $OutPtr
Local $dll=DllOpen('kernel32.dll')
Local $result = DllCall($dll, "none","LCMapStringA", "LONG", 0x0804, "dword", 0x4000000, "STR", _
                    DllStructGetData($InPtr,1),"LONG",DllStructGetSize($InPtr),"str",$OutPtr,'long',DllStructGetSize($InPtr)); "PTR",$OutPtr,'long',DllStructGetSize($InPtr))
If IsArray($result) Then Return $result[5]
EndFunc

Func _FanToJian($sInputText);GBK转GB2312
Local $InPtr = _WinAPI_MultiByteToWideChar($sInputText, 936, $MB_COMPOSITE, False)
Local $OutPtr
Local $dll=DllOpen('kernel32.dll')
Local $result = DllCall($dll, "none","LCMapStringA", "LONG", 0x0804, "dword", 0x2000000, "STR", _
                    DllStructGetData($InPtr,1),"LONG",DllStructGetSize($InPtr),"str",$OutPtr,'long',DllStructGetSize($InPtr)); "PTR",$OutPtr,'long',DllStructGetSize($InPtr))
If IsArray($result) Then Return $result[5]
EndFunc```




		 

		 
	 
		
本文固定链接: http://jianyiit.com/post-300.html





					
				

			
				该日志由 绿色风 于2018-10-6 9:54 Saturday发表在 源码示例
 分类下。

				版权所有：《绿色风's Blog》 → 《Au3中文内码转换UDF，方便调用》；

				除特别标注,本博客很多文章均为原创. 互联分享,尊重版权,转载请以链接形式标明本文地址；

				本文标签：			
				



    
    
    扫描二维码，在手机上阅读







上一篇：：Au3的A*星寻路算法与示例

 下一篇：什么是双缓冲绘图,防止闪烁[收集AU3]







						
						热门文章
												
												
						
						
						相关文章
												
												AU3两圆切示例
												Au3小游戏 2048
												旋转动画AU3
												有点意思的代码-模拟混沌单摆
												图片分割器
												
						
					










							 
		
				
		  

  
						
  
	取消回复
    发表评论
    
      
                  
                  
          
			

				
				亲，头像对么？
			
			姓名: 
            
          
          
			邮箱: 
            
          
          
			主页:
            
          
        
      
            
        
请勾选我再发表评论！					37 + 47 = 
					
					
      
            
提交中，请稍候……
      
      
      
    
    
	
    

      木有头像就木JJ啦！还木有头像吗？点这里申请属于你的个性Gravatar头像吧！


	
		
站点统计运行时间:  20106 天
日志总数: 365 篇
评论数量: 499 条
微语数量: 6 条
附件总量: 388 件

  逝出的青春
  
    	
			
	
   


  打赏"绿色风"
  
    


扫码关注本站公众号 可搜本站内容
 
  


  Autoit V3 脚本交流群
  
    常驻群1:905774875

常驻群2:40672266




  


  链接
  
        AU3中文论坛
        Excel资料库
        完美者博客
        顺网小哥'S Blog
        猛牛哥的博客
        网吧系统下载
      


  分类
  
         流●年(66) 
        
 笔●记(0) 
        
 脚●本(0) 
        
 作品(21) 
        
 学习随记(51) 
        
 源码示例(68) 
        
 UDF(收集)(26) 
        
 工作室UDF(30) 
        
 工具●教程(62) 
        
 教程之GDI(24)