易语言编写DLL的示例：汉字拼音DLL

chenyucheng

用易语言编写的DLL示例程序。封装了易语言自带的拼音功能，和精易模块代码中的“文本_转拼音”“文本_取全部汉字拼音”“文本_取声母”“文本_取首拼”命令。（提示：这些代码均已复制到易语言源码文件中，无模块文件）
另外含有C++的调用示例。以下为C++编写的拼音工具效果截图和文本：

C++制作的拼音工具,使用了易语言编写的DLL

[Plain Text] 纯文本查看 复制代码

                    欢迎使用拼音工具
       (本程序使用了使用"易语言"编写的汉字拼音DLL)

            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
> 1
你选择了: 1. 获取单字拼音信息
请输入一个汉字: 着
汉字 "着" 有 3 个音:
 1.     zhe     声母: zh        韵母: e
 2.     zhao    声母: zh        韵母: ao
 3.     zhuo    声母: zh        韵母: uo

            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
> 2
你选择了: 2. 发音比较

请输入一段文本:
你好

请输入要与其进行比较的文本:
泥嚎

是否支持“南方音”(模糊发音)[Y/N]? (N)

是否为模糊比较(只判断前面是否相同)[Y/N]? (N)

结果: 第一段文本与第二段文本同音。

            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
> 2
你选择了: 2. 发音比较

请输入一段文本:
齿

请输入要与其进行比较的文本:
此

是否支持“南方音”(模糊发音)[Y/N]? (N) y

是否为模糊比较(只判断前面是否相同)[Y/N]? (N)

结果: 第一段文本与第二段文本同音。

            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
> 2
你选择了: 2. 发音比较

请输入一段文本:
你好

请输入要与其进行比较的文本:
您好

是否支持“南方音”(模糊发音)[Y/N]? (N) n

是否为模糊比较(只判断前面是否相同)[Y/N]? (N)

结果: 第一段文本与第二段文本不同音。

            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
> 3
你选择了: 3. 输入字比较

请输入一段文本:
易语言

请输入要与其进行比较的文本输入字:
yyy

是否支持“南方音”(模糊发音)[Y/N]? (N)

输入字类型[1.首拼及全拼; 2.双拼; 3.自动判别]? (3)1

结果: 输入字匹配。

            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
> 3
你选择了: 3. 输入字比较

请输入一段文本:
易语言

请输入要与其进行比较的文本输入字:
yiyuyan

是否支持“南方音”(模糊发音)[Y/N]? (N)

输入字类型[1.首拼及全拼; 2.双拼; 3.自动判别]? (3)1

结果: 输入字匹配。

            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
> 3
你选择了: 3. 输入字比较

请输入一段文本:
列表框

请输入要与其进行比较的文本输入字:
blk

是否支持“南方音”(模糊发音)[Y/N]? (N)

输入字类型[1.首拼及全拼; 2.双拼; 3.自动判别]? (3)

结果: 输入字不匹配。

            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
> 4
你选择了: 4. 整句文字转拼音
    请选择方式   (按其他键返回)
1. 文本_转拼音  2. 文本_取全部汉字拼音
3. 文本_取声母  4. 文本_取首拼
请选择> 1

请输入一段文本:
中文编程 易语言

是否加空格[Y/N]? (N) y

是否全角[Y/N]? (N)

转换结果:
zhong wen bian cheng 　yi yu yan

            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
> 4
你选择了: 4. 整句文字转拼音
    请选择方式   (按其他键返回)
1. 文本_转拼音  2. 文本_取全部汉字拼音
3. 文本_取声母  4. 文本_取首拼
请选择> 2

请输入一段文本:
中文编程 易语言

保留非汉字[Y/N]? (N) n

转换结果:
zhong wen bian cheng  yi yu yan


            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
> 4
你选择了: 4. 整句文字转拼音
    请选择方式   (按其他键返回)
1. 文本_转拼音  2. 文本_取全部汉字拼音
3. 文本_取声母  4. 文本_取首拼
请选择> 3

请输入一段文本:
中文编程 易语言

转换结果:
zwbc yyy


            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
> 4
你选择了: 4. 整句文字转拼音
    请选择方式   (按其他键返回)
1. 文本_转拼音  2. 文本_取全部汉字拼音
3. 文本_取声母  4. 文本_取首拼
请选择> 4

请输入一段文本:
中文编程 易语言

转换结果:
zwbc yyy


            请  选  择  功  能   (按其他键退出程序)
------------------------------------------------------------
1. 获取单字拼音信息     2. 发音比较     3. 输入字比较
4. 整句文字转拼音
>
退出程序.

---

易语言编写的DLL，在C语言/C++中可通过 Windows API 指令 LoadLibrary 来加载，通过 GetProcAddress 获取过程地址，获取到过程地址之后再进行调用。
举例：

[C++] 纯文本查看 复制代码

#include <windows.h>

#define PINYIN_DLL "epinyin.dll"

HINSTANCE hi_pydll;        // 拼音DLL的示例句柄变量

typedef int (WINAPI * FnGetPYCount)(char*);        //“取发音数目”的参数定义
FnGetPYCount GetPYCount = NULL;        // 取发音数目

typedef void (WINAPI * FnGetPY)(char*, int, char*, int);
        //“取拼音”等的参数定义
FnGetPY GetPY = NULL;        // 取拼音
FnGetPY GetSM = NULL;        // 取声母
FnGetPY GetYM = NULL;        // 取韵母

typedef bool (WINAPI * FnCompPY)(char*, char*, bool, bool);
        //“发音比较”的参数定义
FnCompPY CompPY = NULL;        // 发音比较

// 输入字比较常量
#define PY_CODE_TYPE_NORMAL 1        /* 普通(首拼及全拼) */
#define PY_CODE_TYPE_DOUBLE 2        /* 双拼 */
#define PY_CODE_TYPE_AUTO   3        /* 自动判别(按前缀字符) */
typedef bool (WINAPI * FnCompPYCode)(char*, char*, bool, int);
        //“输入字比较”的参数定义
FnCompPYCode CompPYCode = NULL;        // 输入字比较

typedef void (WINAPI * FnGetSentencePYA)(char*, char*, int, bool, bool);
FnGetSentencePYA GetSentencePYA = NULL;        // 文本_转拼音
typedef void (WINAPI * FnGetSentencePYB)(char*, char*, int, bool);
FnGetSentencePYB GetSentencePYB = NULL;        // 文本_取全部汉字拼音
typedef void (WINAPI * FnGetSentencePYC)(char*, char*, int);
FnGetSentencePYC GetSentenceSM = NULL;
FnGetSentencePYC GetSentenceSP = NULL;


bool LoadPYLib() {
        hi_pydll = LoadLibrary(PINYIN_DLL);
        if (hi_pydll == NULL) // 若实例句柄为NULL(加载失败)
                return false;
        // 获取每个命令的函数指针
        GetPYCount = (FnGetPYCount)GetProcAddress(hi_pydll, "GetPYCount");
        GetPY = (FnGetPY)GetProcAddress(hi_pydll, "GetPY");
        GetSM = (FnGetPY)GetProcAddress(hi_pydll, "GetSM");
        GetYM = (FnGetPY)GetProcAddress(hi_pydll, "GetYM");
        CompPY = (FnCompPY)GetProcAddress(hi_pydll, "CompPY");
        CompPYCode = (FnCompPYCode)GetProcAddress(hi_pydll, "CompPYCode");
        GetSentencePYA = (FnGetSentencePYA)GetProcAddress(hi_pydll, "GetSentencePYA");
        GetSentencePYB = (FnGetSentencePYB)GetProcAddress(hi_pydll, "GetSentencePYB");
        GetSentenceSM = (FnGetSentencePYC)GetProcAddress(hi_pydll, "GetSentenceSM");
        GetSentenceSP = (FnGetSentencePYC)GetProcAddress(hi_pydll, "GetSentenceSP");
        return true;
}
/*  使用 LoadPYLib 加载易语言编写的拼音 DLL, 加载成功返回true, 否则返回false。
然后即可使用类似于:
 (*GetPY)(text1, 1, pinyin, sizeof(pinyin));
 (*GetSentencePYB)(text1, pinyin, sizeof(pinyin), true); 
的代码来调用了!  */

在易语言中的调用例：

  

DLL命令名	返回值类型	公开	备 注
DLL_文本_转拼音
DLL库文件名:
epinyin.dll
在DLL库中对应命令名:
GetSentencePYA
参数名	类 型	传址	数组	备 注
欲取其拼音编码的汉字	文本型
返回文本缓冲区	字节集
文本缓冲区长度	整数型
是否加空格	逻辑型
是否全角	逻辑型

DLL命令名	返回值类型	公开	备 注
DLL_文本_取全部汉字拼音
DLL库文件名:
epinyin.dll
在DLL库中对应命令名:
GetSentencePYB
参数名	类 型	传址	数组	备 注
欲取其拼音编码的汉字	文本型
返回文本缓冲区	字节集
文本缓冲区长度	整数型
保留非汉字	逻辑型

子程序名	返回值类型	公开	备 注
_按钮_转拼音_被单击

变量名	类 型	静态	数组	备 注
原文本	文本型
拼音	文本型
拼音字节集	字节集

原文本 ＝ 编辑框_原文.内容
拼音字节集 ＝ 取空白字节集 (取文本长度 (原文本) × 6 ＋ 10)
DLL_文本_取全部汉字拼音 (原文本, 拼音字节集, 取字节集长度 (拼音字节集), 真)
' 或者  DLL_文本_转拼音 (原文本, 拼音字节集, 取字节集长度 (拼音字节集), 真, 假)
拼音 ＝ 到文本 (拼音字节集)
编辑框_拼音.内容 ＝ 拼音

.版本 2<br /> <br /> .DLL命令 DLL_文本_转拼音, , "epinyin.dll", "GetSentencePYA"<br />     .参数 欲取其拼音编码的汉字, 文本型, 传址<br />     .参数 返回文本缓冲区, 字节集, 传址<br />     .参数 文本缓冲区长度, 整数型<br />     .参数 是否加空格, 逻辑型<br />     .参数 是否全角, 逻辑型<br /> <br /> .DLL命令 DLL_文本_取全部汉字拼音, , "epinyin.dll", "GetSentencePYB"<br />     .参数 欲取其拼音编码的汉字, 文本型, 传址<br />     .参数 返回文本缓冲区, 字节集, 传址<br />     .参数 文本缓冲区长度, 整数型<br />     .参数 保留非汉字, 逻辑型<br /> .版本 2<br /> <br /> .子程序 _按钮_转拼音_被单击<br /> .局部变量 原文本, 文本型<br /> .局部变量 拼音, 文本型<br /> .局部变量 拼音字节集, 字节集<br /> <br /> 原文本 ＝ 编辑框_原文.内容<br /> 拼音字节集 ＝ 取空白字节集 (取文本长度 (原文本) × 6 ＋ 10)<br /> DLL_文本_取全部汉字拼音 (原文本, 拼音字节集, 取字节集长度 (拼音字节集), 真)<br /> ' 或者  DLL_文本_转拼音 (原文本, 拼音字节集, 取字节集长度 (拼音字节集), 真, 假)<br /> 拼音 ＝ 到文本 (拼音字节集)<br /> 编辑框_拼音.内容 ＝ 拼音

易语言调用易语言写的DLL的效果

这个易语言编写DLL的示例代码，可以帮你写一个基础的DLL链接库，通过DLL在其他编程语言上实现易语言独有的功能，以及教你如何在DLL中“返回”文本。这是你学习易语言写DLL的一个超基础范例。
DLL的易语言代码，及C++和易语言调用例子的代码文件见本帖底下附件。

447485268

支持开源~！感谢分享

wuqingg

支持开源~！感谢分享

wuqingg

要是C#也能返回文本就好了

chenyucheng

wuqingg 发表于 2024-1-29 19:44
要是C#也能返回文本就好了

你说的是什么？

liangyuhong

支持开源~！感谢分享

gdhong

支持开源~！感谢分享

bianyuan456

已经顶贴，感谢您对论坛的支持！

布点脚本师

支持开源~！感谢分享

396384183

支持开源~！感谢分享