emoji复制粘贴

yaokui6659

怎么吧=把emoji放进易语言，然后点击按钮复制，取其他窗口进行粘贴？易语言不行，到宽文本我试了也不行啊


例如图片中的电话

yaokui6659

  

窗口程序集名	保 留	保 留	备 注
程序集1

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		请在本子程序中放置动态链接库初始化代码

剪辑板_置字节集 (取emoji (“1F3C6”))
_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
返回 (0)  ' 返回值被忽略。

子程序名	返回值类型	公开	备 注
_临时子程序

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。

子程序名	返回值类型	公开	备 注
取emoji	字节集
参数名	类 型	参考	可空	数组	备 注
Unicode码点	文本型				U+xxxx

变量名	类 型	静态	数组	备 注
u	文本型
up
高10位	整数型
低10位	整数型
T	字节集		2
x	文本型

u ＝ 子文本替换 (删全部空 (Unicode码点), “u”, , , , 假)
u ＝ 子文本替换 (u, “+”, , , , 假)
up ＝ 十六进制到整数 (u) － 65536
高10位 ＝ 55296 ＋ 右移 (up, 10)
低10位 ＝ 56320 ＋ 位与 (up, 1023)
T [1] ＝ 到字节集 (取低位_短整数 (高10位)) ＋ 到字节集 (取高位_短整数 (高10位))
T [2] ＝ 到字节集 (取低位_短整数 (低10位)) ＋ 到字节集 (取高位_短整数 (低10位))
返回 (T [1] ＋ T [2])

子程序名	返回值类型	公开	备 注
十六进制到整数	整数型
参数名	类 型	参考	可空	数组	备 注
文本	文本型				16进制文本(0~9 or A~F)  不要带0x

置入代码 ({ 86, 87, 81, 83, 139, 117, 8, 139, 54, 51, 255, 137, 125, 8, 51, 219, 138, 28, 55, 128, 251, 0, 116, 51, 128, 251, 97, 124, 3, 128, 235, 32, 128, 251, 65, 124, 5, 128, 235, 55, 235, 3, 128, 235, 48, 131, 255, 8, 125, 53, 71, 184, 4, 0, 0, 0, 247, 231, 185, 32, 0, 0, 0, 43, 200, 211, 227, 3, 93, 8, 137, 93, 8, 235, 195, 131, 255, 0, 116, 23, 184, 4, 0, 0, 0, 185, 8, 0, 0, 0, 43, 207, 247, 225, 139, 200, 139, 69, 8, 211, 232, 235, 3, 139, 69, 8, 91, 89, 95, 94, 235, 5 })
返回 (0)

子程序名	返回值类型	公开	备 注
取高位_短整数	字节型
参数名	类 型	参考	可空	数组	备 注
短整数	短整数型

置入代码 ({ 139, 69, 8, 193, 232, 8, 201, 194, 4, 0 })
返回 (0)

子程序名	返回值类型	公开	备 注
取低位_短整数	字节型
参数名	类 型	参考	可空	数组	备 注
短整数	短整数型

置入代码 ({ 139, 69, 8, 193, 224, 8, 193, 232, 8, 201, 194, 4, 0 })
返回 (0)

.版本 2<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型, , 请在本子程序中放置动态链接库初始化代码<br /> <br /> 剪辑板_置字节集 (取emoji (“1F3C6”))<br /> _临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码<br /> 返回 (0)  ' 返回值被忽略。<br /> <br /> .子程序 _临时子程序<br /> <br /> ' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。<br /> <br /> .子程序 取emoji, 字节集<br /> .参数 Unicode码点, 文本型, , U+xxxx<br /> .局部变量 u, 文本型<br /> .局部变量 up<br /> .局部变量 高10位, 整数型<br /> .局部变量 低10位, 整数型<br /> .局部变量 T, 字节集, , "2"<br /> .局部变量 x, 文本型<br /> <br /> u ＝ 子文本替换 (删全部空 (Unicode码点), “u”, , , , 假)<br /> u ＝ 子文本替换 (u, “+”, , , , 假)<br /> up ＝ 十六进制到整数 (u) － 65536<br /> 高10位 ＝ 55296 ＋ 右移 (up, 10)<br /> 低10位 ＝ 56320 ＋ 位与 (up, 1023)<br /> T [1] ＝ 到字节集 (取低位_短整数 (高10位)) ＋ 到字节集 (取高位_短整数 (高10位))<br /> T [2] ＝ 到字节集 (取低位_短整数 (低10位)) ＋ 到字节集 (取高位_短整数 (低10位))<br /> 返回 (T [1] ＋ T [2])<br /> <br /> .子程序 十六进制到整数, 整数型<br /> .参数 文本, 文本型, , 16进制文本(0~9 or A~F)  不要带0x<br /> <br /> 置入代码 ({ 86, 87, 81, 83, 139, 117, 8, 139, 54, 51, 255, 137, 125, 8, 51, 219, 138, 28, 55, 128, 251, 0, 116, 51, 128, 251, 97, 124, 3, 128, 235, 32, 128, 251, 65, 124, 5, 128, 235, 55, 235, 3, 128, 235, 48, 131, 255, 8, 125, 53, 71, 184, 4, 0, 0, 0, 247, 231, 185, 32, 0, 0, 0, 43, 200, 211, 227, 3, 93, 8, 137, 93, 8, 235, 195, 131, 255, 0, 116, 23, 184, 4, 0, 0, 0, 185, 8, 0, 0, 0, 43, 207, 247, 225, 139, 200, 139, 69, 8, 211, 232, 235, 3, 139, 69, 8, 91, 89, 95, 94, 235, 5 })<br /> 返回 (0)<br /> <br /> .子程序 取高位_短整数, 字节型, 公开<br /> .参数 短整数, 短整数型<br /> <br /> 置入代码 ({ 139, 69, 8, 193, 232, 8, 201, 194, 4, 0 })<br /> 返回 (0)<br /> <br /> .子程序 取低位_短整数, 字节型, 公开<br /> .参数 短整数, 短整数型<br /> <br /> 置入代码 ({ 139, 69, 8, 193, 224, 8, 193, 232, 8, 201, 194, 4, 0 })<br /> 返回 (0)

这是我在论坛找的，但是，总是多出一点尾巴，如下图，哪位大佬帮忙改一下：

z573277679

示例.e (956.48 KB, 下载次数: 6)

前天 17:23 上传

点击文件名下载附件

mosheng

emoji放不进易语言，因为易语言原生不支持，用字节集存起来，然后操作的时候也要用字节集操作，一旦转为ansi或者转文本就是问号

阿杰大大

可以通过剪辑板_取所有内容,或者说把表情保存在文件里,然后读出表情的字节集,然后用剪辑板_置字节集,置进去.

yaokui6659

阿杰大大 发表于 2026-3-11 16:48
可以通过剪辑板_取所有内容,或者说把表情保存在文件里,然后读出表情的字节集,然后用剪辑板_置字节集,置进去 ...

总是有个小尾巴ꮫꮫꮫꮫ

bttp0059

表情不行吧?  字节集转成文本就会出现"??"

yaokui6659

.版本 2

.程序集 程序集1

.子程序 _启动子程序, 整数型, , 请在本子程序中放置动态链接库初始化代码

剪辑板_置字节集 (取emoji (“1F3C6”))
_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
返回 (0)  ' 返回值被忽略。

.子程序 _临时子程序

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。

.子程序 取emoji, 字节集
.参数 Unicode码点, 文本型, , U+xxxx
.局部变量 u, 文本型
.局部变量 up
.局部变量 高10位, 整数型
.局部变量 低10位, 整数型
.局部变量 T, 字节集, , "2"
.局部变量 x, 文本型

u ＝ 子文本替换 (删全部空 (Unicode码点), “u”, , , , 假)
u ＝ 子文本替换 (u, “+”, , , , 假)
up ＝ 十六进制到整数 (u) － 65536
高10位 ＝ 55296 ＋ 右移 (up, 10)
低10位 ＝ 56320 ＋ 位与 (up, 1023)
T [1] ＝ 到字节集 (取低位_短整数 (高10位)) ＋ 到字节集 (取高位_短整数 (高10位))
T [2] ＝ 到字节集 (取低位_短整数 (低10位)) ＋ 到字节集 (取高位_短整数 (低10位))
返回 (T [1] ＋ T [2])

.子程序 十六进制到整数, 整数型
.参数 文本, 文本型, , 16进制文本(0~9 or A~F)  不要带0x

置入代码 ({ 86, 87, 81, 83, 139, 117, 8, 139, 54, 51, 255, 137, 125, 8, 51, 219, 138, 28, 55, 128, 251, 0, 116, 51, 128, 251, 97, 124, 3, 128, 235, 32, 128, 251, 65, 124, 5, 128, 235, 55, 235, 3, 128, 235, 48, 131, 255, 8, 125, 53, 71, 184, 4, 0, 0, 0, 247, 231, 185, 32, 0, 0, 0, 43, 200, 211, 227, 3, 93, 8, 137, 93, 8, 235, 195, 131, 255, 0, 116, 23, 184, 4, 0, 0, 0, 185, 8, 0, 0, 0, 43, 207, 247, 225, 139, 200, 139, 69, 8, 211, 232, 235, 3, 139, 69, 8, 91, 89, 95, 94, 235, 5 })
返回 (0)

.子程序 取高位_短整数, 字节型, 公开
.参数 短整数, 短整数型

置入代码 ({ 139, 69, 8, 193, 232, 8, 201, 194, 4, 0 })
返回 (0)

.子程序 取低位_短整数, 字节型, 公开
.参数 短整数, 短整数型

置入代码 ({ 139, 69, 8, 193, 224, 8, 193, 232, 8, 201, 194, 4, 0 })
返回 (0)
这是我在论坛找的，但是转换后，所有的表情都会多个尾巴，哪位大佬给改一下，如下图