易语言，如何复制图片 就像置剪辑版文本一样

调用格式： 〈逻辑型〉 置剪辑板数据 （字节集 准备置入剪辑板的数据，整数型 剪辑板数据格式） - eLIB＋＋->剪辑板 *** 作

英文名称：SetClipBoardData

将指定数据存放到当前 Windows 系统剪辑板中去，剪辑板中的原有内容被覆盖。成功返回真，失败返回假。本命令为高级命令。

参数<1>的名称为“准备置入剪辑板的数据”，类型为“字节集（bin）”。

参数<2>的名称为“剪辑板数据格式”，类型为“整数型（int）”，初始值为“1”。即“剪辑板_文本”。指定欲置入剪辑板的数据格式。可以是本支持库常量中以“剪辑板_”开头的标准剪辑板格式常量，或“注册剪辑板格式”命令的返回值。

组件：
画板1（画板背景色=白色）
按钮1（标题=刷新）
按钮2（标题=确认）
编辑框1
程序集变量：验证码，文本型
以下源码：
版本 2
子程序 _按钮1_被单击
局部变量 使用的符号, 文本型, , "0", 要用到的符号，可以有汉字
使用的符号 ＝ { “a”, “b”, “c”, “d”, “e”, “f”, “g”, “h”, “i”, “j”, “k”, “l”, “m”, “n”, “o”, “p”, “q”, “r”, “s”, “t”, “u”, “v”, “w”, “x”, “y”, “z”, “1”, “2”, “3”, “4”, “5”, “6”, “7”, “8”, “9” } '其余请自行添加或更改
验证码 ＝ “” ' 清空一下
计次循环首 (4, ) ' 验证码的位数
验证码 ＝ 验证码 ＋ 使用的符号 [取随机数 (1, 取数组成员数 (使用的符号))]
计次循环尾 ()
画板1清除 (, , , )
画板1字体字体大小 ＝ 20
画板1写文本行 (验证码)
子程序 _按钮2_被单击
如果 (编辑框1内容 ＝ 验证码)
信息框 (“正确”, 0, “”)
否则
信息框 (“错误”, 0, “”)
如果结束

我没有发现写错,造成客户端无法显示可能是你发送的字节集太大,造成传送不完整所致 。遇到这种情况,我的作法是:
将准备发送的分割成几个(具体极限大小是多少,我没有试验过)用"取字节字集中间()"[开始位置从1开始 ],然后再分成几次发送,客户端再把接收到的字节集合并(加)起来组成一个字节集,最后注入到"动画体1"里 。
按这个思路修改试试,希望对你有用

---