delphi tms web core 复制内容到剪切板

本文整理自网络，侵删。

 首先需要用到：http://www.clipboardjs.cn/

clipboard.js
现代化的拷贝文字
不依赖flash, 不依赖其他框架，gzip压缩后只有3kb大小

index.html 引用： 

webmemo1  getElementById设置为：txt1
WebButton1 getElementById 设置为：copy

procedure TForm1.WebButton1Click(Sender: TObject);
begin
asm
      var clipboard = new ClipboardJS('#copy', {
        text: function() {
            return document.getElementById('txt1').value;
        }
    });

    clipboard.on('success', function(e) {
      //  layer.msg('复制成功！');
    });

    clipboard.on('error', function(e) {
     //   layer.msg('复制失败！');
    });
end;
end;

没有啥原创不原创，随便转载分享 ---- delphitop.com
 

相关阅读 >>

Delphi 如何判断一个exe文件是否运行

Delphi 创建console-控制台应用

Delphi里面判断一个字符串在另一个字符串中出现的次数

Delphi 2009 之 tcategorypanelgroup[2]: headeralignment、gradientdirection

Delphi 两字符串之间添加分隔符

Delphi canvas.lineto 画线

Delphi 在线程中运行窗体

Delphi hbp-1100u 欧姆龙血压计的usb调用方法

老外写的在桌面添加快捷方式（Delphi xe5 android）

Delphi 获取系统串口列表

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi tms web core 复制内容到剪切板