易语言取系统缺省本地语言名称源码

系统结构:W2A,A2W,GetUserPreferredUILanguages,SHUnicodeToAnsi,SHAnsiToUnicode,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ W2A
           |  |
           |  |------ A2W
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GetUserPreferredUILanguages
           |  |
           |  |---[dll]------   SHUnicodeToAnsi
           |  |
           |  |---[dll]------   SHAnsiToUnicode

调用的DLL命令:

.DLL命令 GetUserPreferredUILanguages, 逻辑型, "Kernel32.dll", "GetUserPreferredUILanguages", , 获取用户缺省本地语言名称
    .参数 dwFlags, 整数型, , 调用方式
    .参数 pulNumLanguages, 整数型, 传址, 返回语言序号
    .参数 pwszLanguagesBuffer, 字节集, , 返回语言名称数据
    .参数 pcchLanguagesBuffer, 整数型, 传址, 返回缓冲区长度

.DLL命令 SHUnicodeToAnsi, 整数型, "Shlwapi.dll", "SHUnicodeToAnsi", 公开, int WINAPI SHUnicodeToAnsi
    .参数 pwszSrc, 字节集, , _In_ PCWSTR pwszSrc,
    .参数 pszDst, 文本型, 传址, _Out_ PSTR pszDst,
    .参数 cchBuf, 整数型, , int cchBuf,

.DLL命令 SHAnsiToUnicode, 整数型, "Shlwapi.dll", "SHAnsiToUnicode", 公开, int WINAPI SHAnsiToUnicode
    .参数 pszSrc, 文本型, , _In_ PCSTR pszSrc,
    .参数 pwszDst, 字节集, 传址, _Out_ PWSTR pwszDst,
    .参数 cwchBuf, 整数型, , int cwchBuf,