易语言粤语翻译源码

系统结构:翻译,Xmlhttp,URLEncode,URLDecode,工具_编码转换,gbk2utf8,utf8到gbk,取范围文本,CoInitialize,CoUninitialize,lstrcpynA,

======主程序集
           |  |
           |  |------ _按钮_翻译_被单击
           |  |
           |  |------ _单选框_p2c_被单击
           |  |
           |  |------ _单选框_c2p_被单击
           |  |
           |  |------ 翻译
           |  |
           |  |------ Xmlhttp
           |  |
           |  |------ URLEncode
           |  |
           |  |------ URLDecode
           |  |
           |  |------ _URLEncode
           |  |
           |  |------ _URLDecode
           |  |
           |  |------ 工具_编码转换
           |  |
           |  |------ gbk2utf8
           |  |
           |  |------ utf8到gbk
           |  |
           |  |------ 取范围文本
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CoInitialize
           |  |
           |  |---[dll]------   CoUninitialize
           |  |
           |  |---[dll]------   _生成
           |  |
           |  |---[dll]------   _字符编码
           |  |
           |  |---[dll]------   _编码转换
           |  |
           |  |---[dll]------   _取目标编码长度
           |  |
           |  |---[dll]------   lstrcpynA

调用的DLL命令:

.DLL命令 CoInitialize, , "ole32.dll", , , ,
    .参数 pvReserved, 整数型

.DLL命令 CoUninitialize, , "ole32.dll"

.DLL命令 _生成, 整数型, , "WideCharToMultiByte", , WideCharToMultiByte
    .参数 CodePage, 整数型, , CP_ACP CP_UTF8
    .参数 dwFlags, 整数型
    .参数 lpWideCharStr, 文本型
    .参数 cchWideChar, 整数型
    .参数 lpMultiByteStr, 文本型
    .参数 cbMultiByte, 整数型
    .参数 lpDefaultChar, 整数型
    .参数 lpUsedDefaultChar, 整数型

.DLL命令 _字符编码, 整数型, , "MultiByteToWideChar", , MultiByteToWideChar
    .参数 CodePage, 整数型, , CP_ACP CP_UTF8
    .参数 dwFlags, 整数型
    .参数 lpWideCharStr, 文本型
    .参数 cchWideChar, 整数型
    .参数 lpMultiByteStr, 文本型
    .参数 cbMultiByte, 整数型

.DLL命令 _编码转换, 整数型, , "WideCharToMultiByte", , WideCharToMultiByte
    .参数 CodePage, 整数型, , CP_ACP CP_UTF8
    .参数 dwFlags, 整数型
    .参数 lpWideCharStr, 文本型
    .参数 cchWideChar, 整数型
    .参数 lpMultiByteStr, 整数型
    .参数 cbMultiByte, 整数型
    .参数 lpDefaultChar, 整数型
    .参数 lpUsedDefaultChar, 整数型

.DLL命令 _取目标编码长度, 整数型, , "MultiByteToWideChar", , MultiByteToWideChar
    .参数 CodePage, 整数型, , CP_ACP CP_UTF8
    .参数 dwFlags, 整数型
    .参数 lpWideCharStr, 文本型
    .参数 cchWideChar, 整数型
    .参数 lpMultiByteStr, 整数型
    .参数 cbMultiByte, 整数型

.DLL命令 lstrcpynA, 整数型
    .参数 lpString1, 文本型, 传址
    .参数 lpString2, 文本型, 传址
    .参数 iMaxLength, 整数型