为编程爱好者分享易语言教程源码的资源网
好用的代理IP,游戏必备 ____广告位招租____ 服务器99/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器
好用的代理IP,游戏必备 ____广告位招租____ 服务器低至38/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器

网站首页 > 易语言相关 > 系统工具源码 正文

自定义剪贴板数据类型的应用

三叶资源网 2018-10-13 15:51:13 系统工具源码 1340 ℃ 1 评论

自定义剪贴板数据类型的应用,复制网页文本或word文本后点击按钮即可取得其源码。

@易语言学习论坛

.版本 2

.子程序 _按钮2_被单击
.局部变量 ID, 整数型
.局部变量 hMem, 整数型
.局部变量 lSize, 整数型
.局部变量 lPtr, 整数型
.局部变量 bData, 字节集

编辑框1.内容 = “”
ID = ReGISterClipboardFormat (“HTML Format”)
.如果真 (ID > 49152)
    .如果真 (OpenClipboard (取窗口句柄 ()) ≠ 0)
        hMem = GetClipboardData (ID)
        .如果真 (hMem ≠ 0)
            lSize = GlobalSize (hMem)
            .如果真 (lSize ≠ 0)
                lPtr = GlobalLock (hMem)
                .如果真 (lPtr ≠ 0)
                    bData = 取空白字节集 (lSize)
                    CopyMemory (bData, lPtr, lSize)
                    GlobalUnlock (hMem)
                    编辑框1.内容 = UTF8转ANSI (bData)
                    ' 注: 如果网页中含有Unicode字符编辑框无法正常显示
                .如果真结束

            .如果真结束

        .如果真结束

    .如果真结束

.如果真结束
CloseClipboard ()


文件下载

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网⑤群:21414575

已有1位网友发表了看法:

  • 易语言

    易语言  评论于 [2020-06-05 20:54:19]  回复

    自定义粘贴板

欢迎 发表评论:

百度站内搜索
关注微信公众号
三叶资源网⑤群:三叶资源网⑤群

网站分类
随机tag
易语言教程access数据库RAR注释乐玩插件jar打包JMAIL.dll扫码枪软件开发项目管理器HttpWatch破解版libcurl工资管理系统换行符源码进销存系统取群列表远程文件管理迅雷播放器引擎按键模拟弹幕监听分组框美化创建进程
最新评论