剪切板实现代码

合集下载

复制代码方法介绍

复制代码方法介绍全文共四篇示例，供读者参考第一篇示例：复制是计算机操作中经常用到的一个功能，它可以让用户复制文本、图像、文件等内容到剪贴板，然后再粘贴到其他地方。

在编程和开发过程中，复制代码也是一项非常重要的操作。

下面我们来介绍一些常见的复制代码方法。

第一种方法是使用鼠标进行复制。

要复制代码，首先需要选中要复制的内容。

可以通过点击鼠标左键并拖动来选择一段代码，也可以双击鼠标左键来选中单词，或者三次点击鼠标左键来选中整行。

选中后，按下鼠标右键，选择“复制”选项，或者使用快捷键Ctrl + C来复制内容到剪贴板。

然后可以粘贴到其他地方，同样可以通过右键“粘贴”选项或者快捷键Ctrl + V来完成粘贴操作。

第二种方法是使用快捷键进行复制。

为了提高效率，许多操作系统和软件都提供了快捷键来实现复制功能。

在大多数操作系统中，按Ctrl + C可以复制选中内容到剪贴板。

在一些编辑器和IDE中，还可以使用其他组合键来实现快速复制操作，比如Ctrl + Insert。

通过熟练掌握这些快捷键，可以更快地进行代码复制操作。

第三种方法是使用命令行进行复制。

在一些情况下，我们可能需要在命令行中进行代码复制操作。

有些命令行工具提供了自己的复制命令，比如在Linux系统中使用“xclip”命令来实现复制功能。

通过在命令行中输入相应的命令，可以将代码复制到剪贴板中，然后再粘贴到需要的地方。

第四种方法是使用IDE和编辑器的复制功能。

许多集成开发环境（IDE）和代码编辑器都提供了复制功能。

通常可以在编辑器的菜单栏中找到复制选项，也可以通过快捷键来实现复制操作。

在一些高级的编辑器中，甚至可以进行多行复制和粘贴操作，以及其他一些更复杂的剪贴板管理功能。

除了以上介绍的几种方法外，还有一些其他的复制代码方法。

比如一些在线代码编辑器提供了直接复制代码的按钮，只需点击按钮即可将代码复制到剪贴板。

一些代码版本管理工具如Git也提供了复制代码的功能，可以通过命令行或图形界面来完成复制操作。

如何使用普通的PLC实现G代码功能

如何使用普通的PLC实现G代码功能内容摘要：众所周之，我公司的20PM系列PLC支持G代码的功能，但其成本要较一般PLC 高。

以下，我提出了一种利用普通型PLC完成部分G代码功能（G01）的解决办法。

1、问题的提出图一展示了哈尔滨HT公司生产的一种板材，它有上下两层板组成，由冷轧机组轧制后需要按照用户的要求切割出不同的长度用来进行同步的装配工作。

现场使用一台剪板机进行切割作业，使用一台ASMT-30L250伺服马达驱动送料装置，实现不同长度的剪切。

图1最初，设备的供应商使用了DVP80EH002T PLC作为设备的控制器，希望HT公司能够一个尺寸进行多次剪切，这样，每一批次的剪切完毕之后，修改一下送料长度即可。

但现场的实际情况是剪切与装配是配合进行的，现场不可能堆放大量的材料等待装配，必须一次循环便可以按用户要求的次序剪切出规定尺寸的材料。

从上述要求可以看出，由于所需尺寸的规格和数量经常发生变化，这是一个典型的G代码直线插补的程序，如果使用20PM将会非常合适，但供应商出于费用考虑没有采用这种设计，我只能另用它法了。

2、解决方案在数控系统中，程序代码有2种——准备代码和辅助代码。

无论那种代码，在存储过程中都是以ASCII的形式出现的。

这种设备是否可以借用这种方式呢？我认为是不妥当的，原因既有技术上的，也有操作习惯上的。

如果使用数控系统的那种操作方式，势必会大大增加程序的编制量，做很多不属于应用工程师该做的事；另外，HT公司的操作工常年手动操作，没有数控系统的操作经验，不会对这样的操作方式产生认同，因此，不能照搬数控系统的编程方式。

基于以上两点，我认为，新的操作方案一定要简单，而且还需要有扩展性，因为尺寸的数量是不断变化的，可能这次的需要50段工件，下次需要100段工件。

我询问了一下HT的技术人员，得知最大尺寸数量不会超出80。

据此，我在PLC 的数据区中开出了可以存放100段尺寸的空间用于程序的运转。

qt制作简易的剪切板

}
getscreem::~getscreem()
{
}
void getscreem::mousePressEvent(QMouseEvent *e)
{
if (e->button()==Qt::LeftButton)
{
startpoint = e->globalPos();
Qt::KeepAspectRatio,
Qt::SmoothTransformation));
}
getscreem.cpp
#include "getscreem.h"
getscreem::getscreem(QWidget *parent)
: QWidget(parent)
screem->show();
update();
}
{
QPixmap originalPixmap ;
originalPixmap = screem->shootScreen();
bel->setPixmap(originalPixmap.scaled(bel->size(),
connect(ui.pushButton_2,SIGNAL(clicked()),this,SLOT(showImage()));
}
screemcut::~screemcut()
{
}
void screemcut::screemg()
{
screem = new getscreem();
}
QPixmap getscreem::shootScreen()
{

python操作剪贴板的方法

python操作剪贴板的方法操作剪贴板是一项常见的任务，我们经常会在编程中使用剪贴板来复制、粘贴和获取文本。

Python提供了几种方法，可用于在不同的操作系统上操作剪贴板。

1. 使用pyperclip库pyperclip是一个专门用于操作剪贴板的Python库。

使用该库可以轻松地将文本复制到剪贴板，以及从剪贴板中获取文本。

首先，我们需要通过pip安装pyperclip库：```pip install pyperclip```然后，在Python脚本中导入库：```pythonimport pyperclip```要将文本复制到剪贴板，可以使用`copy(`函数：```pythonpyperclip.copy("Hello, World!")```要从剪贴板中获取文本，可以使用`paste(`函数：```pythontext = pyperclip.pasteprint(text)```2. 使用tkinter库如果您使用的是Python的标准库tkinter，那么可以使用它来操作剪贴板。

首先，导入tkinter库：```pythonimport tkinter as tk```然后，创建一个tkinter根窗口对象：```pythonroot = ```要将文本复制到剪贴板，可以使用`clipboard_append(`方法：```pythonroot.clipboard_append("Hello, World!")```要从剪贴板中获取文本，可以使用`clipboard_get(`方法：```pythontext = root.clipboard_getprint(text)```请注意，使用tkinter库时，必须在图形用户界面循环（mainloop）之前使用这些方法。

3. 使用xerox库（仅适用于Windows和Linux）xerox是一个功能强大的Python库，适用于Windows和Linux操作系统。

OLE剪贴板技术

---- 一、概述---- 在Windows操作系统中存在两种剪贴板机制：Windows标准剪贴板和OLE剪贴板机制。

---- 标准的Windows剪贴板是一个被所有Windows应用程序共享的系统服务，因此它并没有自己的句柄或类。

但你可以通过CWnd类的成员函数来管理剪贴板。

---- 自从OLE（Object Linking and Embedding，对象链接和嵌入）诞生之后，Windows操作系统中便出现了第二种剪贴板机制——OLE剪贴板机制。

标准的Windows剪贴板API（Application Programming Interface，应用程序编程接口）依然可用，但是他已经被OLE数据传输机制来实现了。

OLE 支持UDT（Uniform Data Transfer，统一数据传输），并可以通过拖放操作实现剪贴板的剪切、复制和粘贴等操作。

OLE剪贴板除了拥有标准Windows 剪贴板的性能外，还支持传输用户自定义的剪贴板格式，并能够在传输数据时绑定OLE格式（如字体、字号等）。

OLE剪贴板机制将成为更为主要的数据传输机制。

---- 本文将简要叙述标准Windows剪贴板的实现，并将重点放在讨论如何通过Visual C++实现OLE剪贴板上。

---- 二、选择适当的剪贴板机制---- 在选择使用何种剪贴板机制时通常应遵循下面的原则：---- 如果应用程序在将来又可能具有新的性能（比如现在只需要传输纯文本，但将来有可能需要另外传输字体等特性），那么使用OLE剪贴板。

---- 如果你正在使用一个OLE应用程序，或者你希望使用任何OLE特性（如拖放等）那么你应当使用OLE剪贴板机制。

---- 如果你提供了OLE格式（如字体、字号等），那么使用OLE剪贴板机制。

---- 三、使用Windows标准剪贴板---- 大多数Windows下的应用程序支持剪切或复制数据到Windows剪贴板中以及从剪贴板粘贴数据至目的地。

Python剪切板提取、截图、图片粘贴，操作汇总

Python剪切板提取、截图、图⽚粘贴，操作汇总⽬录1. PIL::ImageGrab（不适⽤于Linux）只适⽤于Windows & MacOS系统。

Linux系统⽀持XCB的X11，。

1.1. 截图GrabImageGrab.grab() ⇒ image: 截全屏ImageGrab.grab(bbox) ⇒ image: 截区域>>> im = ImageGrab.grab()>>> im.size(1366, 768)>>> im2 = ImageGrab.grab((300, 100, 1400, 600))>>> im2.mode'RGB'1.2. Grabclipboard截⾄v7.1.2，尚不⽀持Linux系统，。

ImageGrab.grabclipboard() ⇒ image or list of strings or None含义：抓取当前剪贴板的快照，返回⼀个模式为“RGB”的图像或者⽂件名称的列表。

如果剪贴板不包括图像数据，这个函数返回空。

⽤户可以使⽤函数isinstance()来检查该函数返回的是⼀个有效图像对象或者其他数据。

from PIL import Image, ImageGrabim = ImageGrab.grabclipboard()if isinstance(im, Image.Image):print "Image: size : %s, mode: %s" % (im.size, im.mode)im.save("D:\\Document\\mdoc\\python\\pic\\12\\grab_grabclipboard.jpg")elif im:for filename in im:try:print "filename: %s" % filenameim = Image.open(filename)except IOError:pass #ignore this fileelse:print "ImageList: size : %s, mode: %s" % (im.size, im.mode)else:print "clipboard is empty."1.2.1. Error: 'NoneType' object has no attribute 'save'官⽅⽂档有说明，grabclipboard()函数有⼀个缓存的问题，操作太快，有时候它就会读取上⼀次的内容，因为第⼀个没有读取到图像，所以报错了。

js剪切板应用clipboardData详细解析

js剪切板应⽤clipboardData详细解析clipboardData 对象提供了对剪贴板的访问。

1.clearData(sDataFormat) 删除剪贴板中指定格式的数据。

2.getData(sDataFormat) 从剪贴板获取指定格式的数据。

3.setData(sDataFormat, sData) 给剪贴板赋予指定格式的数据。

返回 true 表⽰操作成功。

JAVA中实现剪切，复制，粘贴功能

JAVA中实现剪切，复制，粘贴功能2008-05-12 15:50要用到java.awt.datatransfer包中的Clipboard类import java.awt.*;import java.awt.event.*;import java.awt.datatransfer.*;public class Test extends Frame implements ActionListener { MenuBar menubar; Menu menu;MenuItem copy,cut,paste;TextArea text1,text2;Clipboard clipboard=null;Test(){ clipboard=getToolkit().getSystemClipboard();//获取系统剪贴板。

menubar=new MenuBar();menu=new Menu("Edit"); copy=new MenuItem("copy");cut=new MenuItem ("cut"); paste=new MenuItem ("paste");text1=new TextArea(20,20); text2=new TextArea(20,20);copy.addActionListener(this); cut.addActionListener(this);paste.addActionListener(this);setLayout(new FlowLayout());menubar.add(menu);menu.add(copy); menu.add(cut); menu.add(paste);setMenuBar(menubar);add(text1);add(text2);setBounds(100,100,200,250); setVisible(true);pack();addWindowListener(new WindowAdapter(){public void windowClosing(WindowEvent e){System.exit(0);}}public void actionPerformed(ActionEvent e){ if(e.getSource()==copy) //拷贝到剪贴板。

vb 实现复制剪切

实现复制剪切两个最有用的 Clipboard 方法是SetText 和 GetText。

用SetText 和GetText 方法向剪贴板和从剪贴板传送数据SetText 将文本复制到 Clipboard 上，替换先前存储在那里的文本。

可将SetText 作为一条语句使用。

其语法如下：Clipboard.SetText data[, format]GetText 返回存储在 Clipboard 上的文本。

也可将它作为函数使用：destination = Clipboard.GetText()将 SetText 和 GetText 方法，和“使用选定文本”中介绍的选择属性结合起来使用，可容易地编写文本框的“复制”，“剪切”和“粘贴”命令。

下列一些事件过程，为以 mnuCopy，mnuCut 和 mnuPaste 命名的控件，实现了这些命令：Private Sub mnuCopy_Click () '复制Clipboard.ClearClipboard.SetText= Text1.SelTextEnd SubPrivate Sub mnuCut_Click () '剪切Clipboard.ClearClipboard.SetText= Text1.SelTextText1.SelText = ""End SubPrivate Sub mnuPaste_Click () '粘贴Text1.SelText = Clipboard.GetText()End Sub注意如果它们都是菜单控件时，示例会工作得最好，这是因为 Text1 有焦点时可使用菜单。

要注意的是 Copy 和 Cut 这两个过程，都要先用 Clear 方法将 Clipboard 清空。

（因为可能要以几种不同的格式在 Clipboard 上放置数据，所以Clipboard 不应自动清空。

这在本章后面的“在 Clipboard 上使用多种格式”中有详细描述。

js 获取剪贴板数据的方法

（原创实用版4篇）编制人员:_______________审核人员:_______________审批人员:_______________编制单位:_______________编制时间:____年___月___日序言下面是本店铺为大家精心编写的4篇《js 获取剪贴板数据的方法》，供大家借鉴与参考。

下载后，可根据实际需要进行调整和使用，希望能够帮助到大家，谢射!（4篇）《js 获取剪贴板数据的方法》篇1在 JavaScript 中，获取剪贴板数据的方法主要是通过操作剪贴板对象（clipboardData）。

剪贴板对象是 window 对象的一个子对象，可以通过调用window.clipboardData 来获取。

具体地，可以使用以下代码获取剪贴板数据：```javascriptconst clipboardData = window.clipboardData;```如果剪贴板中没有数据，上述代码会返回一个空对象。

如果剪贴板中有数据，则可以通过以下代码获取剪贴板中的数据：```javascriptconst clipboardDataText = clipboardData.getData("Text");const clipboardDataImage = clipboardData.getData("Image");const clipboardDataVideo = clipboardData.getData("Video");```以上代码分别获取剪贴板中的文本、图像和视频数据。

如果剪贴板中没有相应的数据，则返回一个空字符串或 null。

需要注意的是，如果浏览器禁止了剪贴板的访问，则上述代码无法正常工作。

《js 获取剪贴板数据的方法》篇2在 JavaScript 中，获取剪贴板数据的方法可以通过访问 Clipboard 对象的 data 属性来实现。

win32 剪切板操作

win32 剪切板操作（转）(一)ChangeClipboardChain将剪贴的连接从一个句柄转到下一个句柄。

BOOL ChangeClipboardChain(HWND hWndRemove, // handle to window to removeHWND hWndNewNext // handle to next window);(1)hWndRemove表示第一个窗口的句柄(断开)。

(2)hWndNewNext表示第二个窗口的句柄(连接)。

注意，在使用之前应该使用SetClipboardViewer事先进行窗口句柄的连接。

(二)CloseClipboard关闭剪贴板。

BOOL CloseClipboard(VOID)//VOID意思是空白。

本函数没有参数，事先应该用OpenClipboard函数打开过剪贴板。

(三)CountClipboardFormats不管剪贴板是什么格式，全部转化为数据格式。

int CountClipboardFormats(VOID)本函数没有参数。

(四)EmptyClipboard清空剪贴板。

BOOL EmptyClipboard(VOID)本函数没有参数。

(五)EnumClipboardFormats使剪贴板内的格式转变成指定格式。

UINT EnumClipboardFormats(UINT format // specifies a known available clipboard format);其中format表示的是将要转化成的格式。

该参数的意义可参照后面。

(六)GetClipboardData获取剪贴板内的数据。

HANDLE GetClipboardData(UINT uFormat // clipboard format);其中format表示的是剪贴板内数据的格式。

该参数的意义可参照后面。

(七)GetClipboardFormatName获取剪贴板内数据格式的名称。

VBA操作剪切板

VBA操作剪切板VBA（Visual Basic for Applications）是一种用于自动化操作Microsoft Office应用程序的编程语言。

在VBA中，我们可以使用Clipboard对象来操作剪切板，包括读取剪切板内容、向剪切板中写入内容等。

一、读取剪切板内容要读取剪切板中的内容，我们可以使用Clipboard对象的GetText方法。

GetText方法有一个可选参数，用于指定读取内容的格式。

如果未指定格式，则默认为文本格式。

以下是一个示例：```Dim clipText As StringclipText = Clipboard.GetText```在这个示例中，我们使用GetText方法将剪切板中的文本内容读取到了clipText变量中。

二、向剪切板中写入内容要向剪切板中写入内容，我们可以使用Clipboard对象的SetText方法。

SetText方法有两个参数，第一个参数是要写入的文本内容，第二个参数是指定写入内容的格式。

以下是一个示例：```Dim textToCopy As StringtextToCopy = "Hello, World!"Clipboard.SetText textToCopy```在这个示例中，我们使用SetText方法将textToCopy变量中的文本内容写入到了剪切板中。

三、其他操作除了读取和写入文本内容，Clipboard对象还支持其他一些常用的操作。

以下是其中一些方法和属性的示例：1. GetFormat方法：用于获取剪切板中的内容格式。

以下是一个示例：```Dim format As Integerformat = Clipboard.GetFormat```2. Clear方法：用于清空剪切板中的内容。

以下是一个示例：```Clipboard.Clear```3. GetTextFormat方法：用于获取剪切板中的文本内容及其格式。

node.js实现复制文本到剪切板的功能

node.js实现复制⽂本到剪切板的功能前⾔最近在⼯作中遇到⼀种需求：我需要请求后端数据，但请求数据前需要登陆，获得⼀个token。

登陆⽅式是向⼀个json地址post数据即可。

之前我的做法是，⽤chrome插件postman来实现登陆动作。

但后来⽆意中发现，postman内存占⽤超⾼！即使我并没有使⽤它。

这让我很不爽。

后来⼀想，实现这么简单的⼀个动作，⽤这么重的插件，对于我这样⼀个会nodejs的前端程序员是不是太Low了？简直不好意思对⼈讲⾃⼰会nodejs！于是我就花了点时间写了个简单的脚本。

本⽂记录⼀下开发过程。

实现思路思路⼤概是，⽤nodejs脚本发请求，并将返回结果中的token⾃动复制到剪切板，于是我只⽤在调试代码中，ctrl+v就⾏了。

思路很简单，但实现起来居然坑很多。

nodejs没有直接复制到剪切板的API！⾮常简单的功能，但nodejs没有提供。

但不要绝望，因为nodejs可以调⽤系统命令，⽽系统命令中有不少可以操作剪切板的命令。

我google之后，由于系统是windows，所以考虑使⽤windows cmd命令中的clip，来实现复制到剪切板的功能。

nodejs调⽤系统命令（cmd）即var exec = require(‘child_process').exec，然后你就可以像普通函数⼀样调⽤它，如：exec(‘echo 111');clip命令的坑在cmd⾥，实现复制⽂本到剪切板最简单的命令是：echo 123456 | clip。

本来，在nodejs中拼出这样⼀句语句，交给child_process.exec执⾏就可以了。

但这个命令的执⾏结果，有个我⽆法忍受的bug：复制出来的⽂本，最后有个换⾏符（echo 造成的）！我不可能在ctrl+v后，还要按⼏下删除键才能ctrl+s啊！当时让我很纠结，我很奇怪微软连这么简单的命令都没作好。

但⽆奈事情还是要做的，只有继续寻找解决办法。

VB 剪切板应用

VB 剪切板应用今天发现了一个不错的剪贴板的应用可以让VB 写出一个不错的个性以下是转载文字有时候大家看到在某些程序复制出的东西不能被粘贴在其他的地方（粘贴为灰色）。

在VB中也可以实现这种效果。

即使用自己的剪切板格式刚才翻墙找到了一段读剪切板的代码。

于是我仿照着写出了写剪切板的代码。

用法如下：SetClipboardIDForCustomFormat Lyer's'双引号中字符串为你定义的剪切板格式说明写剪切板：SetCBData 往剪切板中写啥呢？读剪切板：Lyer=GetCBData判断剪切板中是否有自己格式的数据：if IsCBMyFormat then'.......end if'======================================================' Lyer[Ryuu.U]'- Aug 07,2010 -'======================================================'lyerblogitemfd6d9313f543168d6538dba3.htmlPrivate Declare Function OpenClipboard Lib user32 (ByVal hWnd As Long) As Long Private Declare Function SetClipboardData Lib user32 (ByVal wFormat As Long, ByVal hMem As Long) As LongPrivate Declare Function CloseClipboard Lib user32 () As LongPrivate Declare Function GetClipboardData Lib user32 (ByVal wFormat As Long) As Long Private Declare Function IsClipboardFormatAvailable Lib user32 (ByVal wFormat As Long) As LongPrivate Declare Function RegisterClipboardFormat Lib user32 AliasRegisterClipboardFormatA (ByVal lpString As String) As LongPrivate Declare Function GlobalAlloc Lib kernel32 (ByVal wFlags As Long, ByVal dwBytes As Long) As LongPrivate Declare Function GlobalLock Lib kernel32 (ByVal hMem As Long) As Long Private Declare Function GlobalUnlock Lib kernel32 (ByVal hMem As Long) As Long Private Declare Function GlobalSize Lib kernel32 (ByVal hMem As Long) As Long Private Declare Sub CopyMemory Lib kernel32 Alias RtlMoveMemory ( lpvDest As Any, lpvSource As Any, ByVal cbCopy As Long)Private Declare Function EmptyClipboard Lib user32 () As LongPrivate Const GMEM_MOVEABLE = &H2Private Const GMEM_ZEROINIT = &H40Private Const GHND = (GMEM_MOVEABLE Or GMEM_ZEROINIT)Public lFormatID As LongPublic Sub SetClipboardIDForCustomFormat(ByVal sName As String) 'As LongDim wFormat As LongwFormat = RegisterClipboardFormat(sName & Chr$(0))If (wFormat &HC000&) ThenlFormatID = wFormatEnd IfEnd SubPublic Function GetCBData() As StringDim bData() As ByteDim hMem As LongDim lSize As LongDim lPtr As LongIf (OpenClipboard(0)) ThenIf (IsClipboardFormatAvailable(lFormatID) 0) ThenhMem = GetClipboardData(lFormatID)If (hMem 0) ThenlSize = GlobalSize(hMem)If (lSize 0) ThenlPtr = GlobalLock(hMem)If (lPtr 0) ThenReDim bData(0 To lSize - 1) As ByteCopyMemory bData(0), ByVal lPtr, lSizeGlobalUnlock hMemGetCBData = StrConv(bData, vbUnicode)End IfEnd IfEnd IfEnd IfCloseClipboardEnd IfEnd FunctionPublic Function IsCBMyFormat() As BooleanDim hMem As LongDim lSize As LongDim lPtr As LongIf (OpenClipboard(0)) ThenIf (IsClipboardFormatAvailable(lFormatID) 0) ThenhMem = GetClipboardData(lFormatID)If (hMem 0) ThenIsCBMyFormat = TrueEnd IfEnd IfCloseClipboardEnd IfEnd FunctionPublic Sub SetCBData(ByVal CBText As String)Dim bData() As ByteDim hMem As LongDim lSize As LongDim lPtr As LongIf (OpenClipboard(0)) ThenbData() = StrConv(CBText & Chr(0), vbFromUnicode)lSize = GlobalAlloc(GHND, UBound(bData))If lSize 0 ThenlPtr = GlobalLock(lSize)CopyMemory ByVal lPtr, bData(0), UBound(bData)EmptyClipboard '这一句去掉可以使原剪切板中数据保留，自己的数据写入后，并不一定互相影响。

uni.app复制到剪切板功能的两种实现方式

设置粘贴板数据paramstringtext要设置的字符串如果未设置参数则清空数据functionsetclipboardtexttexttryvarosplusosname
uni.app复制到剪切板功能的两种实现方式
1、方法一
/** * 设置粘贴板数据 * @param {String} text 要设置的字符串 * 如果未设置参数，则清空数据 */ function setClipboardText(text){
}
module.exports = { setText: setClipboardText, getText: getClipboardText
}
2、方法二ຫໍສະໝຸດ function getClipboardText(){ try{ var os = ; if('iOS' == os){ var pasteboard = plus.ios.invoke('UIPasteboard', 'generalPasteboard'); return plus.ios.invoke(pasteboard, 'valueForPasteboardType:', 'public.utf8-plain-text') }else{ var main = plus.android.runtimeMainActivity(); var clip = main.getSystemService('clipboard'); return plus.android.invoke(clip, 'getText'); } }catch(e){ console.error('error @getClipboardText!!'); }

C#中的剪切板操作

C#定义了一个类System.Windows.Forms.Clipboard来简化剪切板操作，这个类有一个静态方法，主要有：Clear清除剪切板中的所有数据；ContainsData，ContainsAudio，ContainsFlieDropList，ContainsText，ContainsImage，用于检查剪切板中是否存在相应的数据；GetAudioStream，GetDataObject，GetText，GetImage，GetFileDropList，用于取得数据；SetAudio，SetDataObject，SetText，SetImage，SetFileDropList，用于添加数据；以下是检测剪切板的方法：一、引入要使用剪切板首先要引入三个函数，[System.Runtime.InteropServices.DllImport("user32")]private static extern IntPtr SetClipboardViewer(IntPtr hwnd);[System.Runtime.InteropServices.DllImport("user32")]private static extern IntPtr ChangeClipboardChain(IntPtr hwnd,IntPtr hWndNext);[System.Runtime.InteropServices.DllImport("user32")]private static extern int SendMessage(IntPtr hwnd,int wMsg,IntPtr wParam,IntPtr lParam);const int WM_DRAWCLIPBOARD = 0x308;const int WM_CHANGECBCHAIN = 0x30D;IntPtr SetClipboardViewer(IntPtr hwnd) 用于往观察链中添加一个窗口句柄，这个窗口就可成为观察链中的一员了，返回值指向下一个观察者。

C#读取剪切板（Clipboard）中的数据的方法

C#读取剪切板（Clipboard）中的数据的⽅法1 ⾃定义⼀个类，并且保证它的可序列化的：实现ISerializable接⼝；或者⽤[Serializable]标记（如果有⽗类，则⽗类也需要被标记；可以[NonSerialized（）]标记类中不想被序列化的字段） 2 注册⾃定义数据格式：调⽤静态⽅法DataFormats.GetFormat（） 3 保存数据到clipboard：利⽤IdataObject接⼝，创建⼀个数据对象，并设置数据；调⽤Clipboard.SetDataObject（）⽅法 4 从clipboard获取数据：调⽤DataObject 实例的GetDataPresent（）保证数据格式与应⽤程序兼容；调⽤IDataObject 的GetData（）⽅法获取数据⽰例程序：　using System;using System.Collections.Generic;using ponentModel;using System.Data;using System.Drawing;using System.Linq;using System.Text;using System.Windows.Forms;using System.Runtime.Serialization.Formatters.Binary;namespace _ClipboardTest_{public partial class Form1 : Form{[System.Runtime.InteropServices.DllImport("user32")]private static extern IntPtr SetClipboardViewer(IntPtr hwnd);[System.Runtime.InteropServices.DllImport("user32")]private static extern IntPtr ChangeClipboardChain(IntPtr hwnd, IntPtr hWndNext);[System.Runtime.InteropServices.DllImport("user32")]private static extern int SendMessage(IntPtr hwnd, int wMsg, IntPtr wParam, IntPtr lParam);const int WM_DRAWCLIPBOARD = 0x308;const int WM_CHANGECBCHAIN = 0x30D;public Form1(){InitializeComponent();}private void Form1_Load(object sender, EventArgs e){//获得观察链中下⼀个窗⼝句柄NextClipHwnd = SetClipboardViewer(this.Handle);}protected override void WndProc(ref System.Windows.Forms.Message m){switch (m.Msg){case WM_DRAWCLIPBOARD://将WM_DRAWCLIPBOARD消息传递到下⼀个观察链中的窗⼝SendMessage(NextClipHwnd, m.Msg, m.WParam, m.LParam);IDataObject iData = Clipboard.GetDataObject();//检测⽂本if (iData.GetDataPresent(DataFormats.Text) | iData.GetDataPresent(DataFormats.OemText)){this.richTextBox1.Text = (String)iData.GetData(DataFormats.Text);}//检测图像if (iData.GetDataPresent(DataFormats.Bitmap)){pictureBox1.Image = Clipboard.GetImage();MyItem item = new MyItem();item.CopyToClipboard();}//检测⾃定义类型if (iData.GetDataPresent(typeof(MyItem).FullName)){// MyItem item = (MyItem)iData.GetData(typeof(MyItem).FullName);MyItem item = GetFromClipboard();if (item != null){this.richTextBox1.Text = item.ItemName;}}break;default:base.WndProc(ref m);break;}}private void Form1_Closed(object sender, System.EventArgs e){//从观察链中删除本观察窗⼝（第⼀个参数：将要删除的窗⼝的句柄；第⼆个参数：观察链中下⼀个窗⼝的句柄）ChangeClipboardChain(this.Handle, NextClipHwnd);//将变动消息WM_CHANGECBCHAIN消息传递到下⼀个观察链中的窗⼝SendMessage(NextClipHwnd, WM_CHANGECBCHAIN, this.Handle, NextClipHwnd);}IntPtr NextClipHwnd;protected static MyItem GetFromClipboard(){MyItem item = null;IDataObject dataObj = Clipboard.GetDataObject();string format = typeof(MyItem).FullName;if (dataObj.GetDataPresent(format)){item = dataObj.GetData(format) as MyItem;}return item;}}[Serializable]public class MyItem{public MyItem(){itemName = "This is a Custom Item";}public string ItemName{get { return itemName; }}private string itemName;public void CopyToClipboard(){DataFormats.Format format = DataFormats.GetFormat(typeof(MyItem).FullName);IDataObject dataObj = new DataObject();dataObj.SetData(, false, this);Clipboard.SetDataObject(dataObj, false);}}}。

Delphi操作剪贴板

Delphi操作剪贴板剪切板类TClipboard 定义在Clipbrd 单元, 使用前先要uses Clipbrd;uses Clipbrd;procedure TForm1.Button1Click(Sender: TObject);varclip: TClipboard;beginclip := TClipboard.Create; {建立}clip.AsText := Self.T ext; {把窗体标题放入剪切板}ShowMessage(clip.AsText); {从剪切板读取, 返回结果是: Form1} {因为剪切板是全局的, 此时可以在其他地方粘贴一试}clip.Free; {释放}end;根据 Delphi 给我们提供的方便, 上面的例子可以简化为:uses Clipbrd;procedure TForm1.Button1Click(Sender: TObject);beginClipboard.AsT ext := Text;ShowMessage(Clipboard.AsText); {Form1}end;这个 Clipboard 是什么? 是不是和 Screen 一样的类型变量?答案是否定的! Clipboard 只是个函数, 是一个无参函数, 是定义在Clipbrd 单元的一个全局函数, 它返回一个 TClipboard 类型的变量, 当我看到这个函数的源码时, 真是感觉又学了一招, 非常精巧的思路.除了用 TClipboard.AsText 属性, 我们还可以使用 SetTextBuf 把文本放入剪切板、使用 GetTextBuf 读出剪切板中的文本.uses Clipbrd;{使用 SetT extBuf}procedure TForm1.Button1Click(Sender: TObject);beginClipboard.SetTextBuf(PChar(Text)); {按参数类型要求, 需要转换一下}ShowMessage(Clipboard.AsText); {Form1}end;{使用 GetTextBuf 就和使用 API 差不多, 需要给个缓冲区}procedure TForm1.Button2Click(Sender: TObject);vararr: array[0..255] of Char;beginClipboard.AsT ext := Text;Clipboard.GetTextBuf(arr, Length(arr));ShowMessage(arr); {Form1}end;{如果不给缓冲区, 那你自己得申请并释放内存}procedure TForm1.Button3Click(Sender: TObject);varpc: PChar;beginClipboard.AsT ext := Text;GetMem(pc, 256); {申请内存}Clipboard.GetTextBuf(pc, 256);ShowMessage(pc); {Form1}FreeMem(pc); {释放内存}end;准备工作:在窗体上放置一个 TPanel; 在 TPanel 上放一个 TImage; 另外需要三个按钮.第一版代码:unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtCtrls;typeTForm1 = class(TForm)Button1: TButton;Button2: TButton;Button3: TButton;Panel1: TPanel;Image1: TImage;procedure Button1Click(Sender: TObject);procedure Button2Click(Sender: TObject);procedure Button3Click(Sender: TObject);end;varForm1: TForm1;implementation{$R *.dfm}uses Clipbrd;procedure TForm1.Button1Click(Sender: TObject);beginImage1.Left := 0;Image1.Top := 0;Panel1.AutoSize := True;Image1.AutoSize := True;Image1.Picture.LoadFromFile('c:/temp/test.bmp');TButton(Sender).Caption := '导入';end;procedure TForm1.Button2Click(Sender: TObject);beginClipboard.Assign(Image1.Picture); {把 Image1 中的图片放入剪切板}{现在在图像软件中都可以粘贴了, 可以用 Windows 画图板试试}TButton(Sender).Caption := '复制';end;procedure TForm1.Button3Click(Sender: TObject);varbit: TBitmap; {准备用一个 TBitmap 从剪切板中结束图片}x,y: Integer;beginbit := TBitmap.Create;bit.Assign(Clipboard); {从剪切板获取}x := Panel1.Width + Panel1.Left * 2; {x,y 是准备在窗体上的粘贴位置}y := Panel1.T op;Canvas.Draw(x, y, bit); {粘贴就是画出来呗}bit.Free;TButton(Sender).Caption := '粘贴';end;end.不过现在程序还有漏洞: 假如剪切板中没有东西, 粘贴什么? 如果剪切板中不是图片, 怎么粘贴?其实我们只用TClipboard.HasFormat 函数判断一下剪切板中是不是图片就行了.第二版代码:unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtCtrls;typeTForm1 = class(TForm)Button1: TButton;Button2: TButton;Button3: TButton;Panel1: TPanel;Image1: TImage;procedure Button1Click(Sender: TObject);procedure Button2Click(Sender: TObject);procedure Button3Click(Sender: TObject);end;varForm1: TForm1;implementation{$R *.dfm}uses Clipbrd;procedure TForm1.Button1Click(Sender: TObject);beginImage1.Left := 0;Image1.Top := 0;Panel1.AutoSize := True;Image1.AutoSize := True;Image1.Picture.LoadFromFile('c:/temp/test.bmp'); TButton(Sender).Caption := '导入';end;procedure TForm1.Button2Click(Sender: TObject); begin{如果 Image1 还没有图片, 就别复制了, 退出吧}if Image1.Picture = nil then Exit;Clipboard.Assign(Image1.Picture);TButton(Sender).Caption := '复制';end;procedure TForm1.Button3Click(Sender: TObject); varbit: TBitmap;x,y: Integer;begin{如果当前剪切板中的东西不是图片, 就退出}if not Clipboard.HasFormat(CF_BITMAP) then Exit;bit := TBitmap.Create;bit.Assign(Clipboard);x := Panel1.Width + Panel1.Left * 2;y := Panel1.T op;Canvas.Draw(x, y, bit);bit.Free;TButton(Sender).Caption := '粘贴';end;end.现在有出了新的问题: CF_BITMAP 常量表示图片, 其他格式怎么表示? 有多少格式可以用于剪切板?本例演示把一个组件(TEdit)放入剪切板, 又取出(放到一个TPanel 上)的过程.放入剪切板的方法是个过程: SetComponent(要放入的组件);取出的方法是个函数: GetComponent(指定属主, 指定父窗口): 函数返回取出的组件的句柄.取出以前, 最好要判断一下当前剪切板中是不是个组件: HasFormat(CF_COMPONENT);取出以前还必须要注册要取出的组件类, 譬如: RegisterClasses([TEdit]);准备工作: 在窗体上添加 TEdit、TPanel 和三个按钮.unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtCtrls;typeTForm1 = class(TForm)Button1: TButton;Button2: TButton;Button3: TButton;Edit1: TEdit;Panel1: TPanel;procedure Button1Click(Sender: TObject);procedure Button2Click(Sender: TObject);procedure Button3Click(Sender: TObject);end;varForm1: TForm1;implementation{$R *.dfm}uses Clipbrd;var obj: TComponent; {用于接受 GetComponent 的返回值}procedure TForm1.Button1Click(Sender: TObject); beginClipboard.SetComponent(Edit1);TButton(Sender).Caption := '复制';end;procedure TForm1.Button2Click(Sender: TObject); beginRegisterClasses([TEdit]);if Clipboard.HasFormat(CF_COMPONENT) thenobj := Clipboard.GetComponent(nil, Panel1);TButton(Sender).Caption := '粘贴';end;procedure TForm1.Button3Click(Sender: TObject); beginif Assigned(obj) then obj.Free;TButton(Sender).Caption := '删除';end;end.一般情况下, 应该把 RegisterClasses(); 过程提前放置(起码可以避免反复执行), 譬如在 Form1.OnCreate 事件中;大家好像都习惯再提前到: initialization. 程序修改如下:unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtCtrls;typeTForm1 = class(TForm)Button1: TButton;Button2: TButton;Button3: TButton;Edit1: TEdit;Panel1: TPanel;procedure Button1Click(Sender: TObject);procedure Button2Click(Sender: TObject); procedure Button3Click(Sender: TObject); end;varForm1: TForm1;implementation{$R *.dfm}uses Clipbrd;var obj: TComponent;procedure TForm1.Button1Click(Sender: TObject); beginClipboard.SetComponent(Edit1);TButton(Sender).Caption := '复制';end;procedure TForm1.Button2Click(Sender: TObject); beginif Clipboard.HasFormat(CF_COMPONENT) then obj := Clipboard.GetComponent(nil, Panel1); TButton(Sender).Caption := '粘贴';end;procedure TForm1.Button3Click(Sender: TObject); beginif Assigned(obj) then obj.Free;TButton(Sender).Caption := '删除';end;initializationRegisterClasses([TEdit]);end.另外, 关于剪切板中格式的问题还没有详谈, 这里有来了一个CF_COMPONENT.Windows 系统已经定义了十几种剪切板的格式常数, 譬如: CF_BITMAP、CF_TEXT 等等;不过这里的 CF_COMPONENT 是 Delphi 自定义的, 可以猜测: 在需要的时候, 我们也可以自定义剪切板中的格式.如果连同子控件一起复制到剪切板, 需要定义一个新类型.譬如在一个 TPanel 中包含一个 TEdit; 在复制 TPanel 时, 若要连同TEdit 一起复制, 需要重新从TPanel 中继承出一个类来(譬如是TMyPanel), 把 TEdit 包含在新的类中.TMyPanel 类的单元:unit MyPanel;interfaceuses Classes, StdCtrls, ExtCtrls;typeTMyPanel = class(TPanel)Edit1: TEdit;constructor Create(AOwner: TComponent); override; end;implementation{ TMyPanel }constructor TMyPanel.Create(AOwner: TComponent); begininherited;Edit1 := TEdit.Create(Self);Edit1.Parent := Self;Edit1.Left := 10;Edit1.Top := 10;RegisterClasses([TMyPanel]); {在这里就给注册了}end;end.测试单元:unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 = class(TForm)Button1: TButton;Button2: TButton;procedure FormCreate(Sender: TObject);procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); end;varForm1: TForm1;implementation{$R *.dfm}uses Clipbrd, MyPanel;varobj: TComponent;pnl: TMyPanel;procedure TForm1.FormCreate(Sender: TObject); beginpnl := TMyPanel.Create(Self);pnl.Parent := Self;pnl.Edit1.Text := '一起被复制';Button1.Caption := '复制';Button2.Caption := '粘贴';end;procedure TForm1.Button1Click(Sender: TObject); beginClipboard.SetComponent(pnl);end;procedure TForm1.Button2Click(Sender: TObject);beginif Clipboard.HasFormat(CF_COMPONENT) thenbeginobj := Clipboard.GetComponent(Self, Self);TMypanel(obj).Left := 20;TMypanel(obj).Top := 60;end;end;end.如果要在剪切板中存放自己的格式, 需要用到SetAsHandle、GetAsHandle 两个方法.SetAsHandle(用于剪切板的格式ID, 数据的内存句柄); 看这个方法的两个参数都有点麻烦.自定义剪切板格式要用RegisterClipboardFormat 函数; 第二个参数是内存句柄而不是内存地址, 能分配内存并返回句柄的函数暂时我只知道GlobalAlloc、GlobalReAlloc 两个函数, 使用它们分配用于剪切板的内存时还须使用 GMEM_DDESHARE 标志.GetAsHandle(用于剪切板的格式ID) 方法返回的是数据所在内存的句柄.通过内存句柄获取获取内存地址, 还要用到 GlobalLock 函数.本例自定义了结构 TMyRec, 并指定了对应的剪切板格式 CF_MY.unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 = class(TForm)Button1: TButton;Button2: TButton;procedure FormCreate(Sender: TObject);procedure Button1Click(Sender: TObject);procedure Button2Click(Sender: TObject);end;varForm1: TForm1;implementation{$R *.dfm}uses Clipbrd;TypeTMyRec = recordname: string[8];age : Byte;end;varCF_MY: Word;procedure TForm1.FormCreate(Sender: TObject);beginCF_MY := RegisterClipboardFormat('My Format'); end;procedure TForm1.Button1Click(Sender: TObject);varPRec: ^TMyRec;Data: THandle;beginData := GlobalAlloc(GMEM_DDESHARE, SizeOf(TMyRec)); PRec := GlobalLock(Data); := '张三';PRec.age := 99;GlobalUnlock(Data);Clipboard.SetAsHandle(CF_MY, Data);end;procedure TForm1.Button2Click(Sender: TObject);varPRec: ^TMyRec;Data: THandle;beginif not Clipboard.HasFormat(CF_MY) then Exit;Data := Clipboard.GetAsHandle(CF_MY);PRec := GlobalLock(Data);ShowMessageFmt('%s %d 岁', [, PRec.age]); {张三99 岁}GlobalUnlock(Data);end;end.//这个例子忘了 GlobalFree 了.unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 = class(TForm)Button1: TButton;Button2: TButton;Button3: TButton;procedure Button1Click(Sender: TObject);procedure Button2Click(Sender: TObject);procedure Button3Click(Sender: TObject);end;varForm1: TForm1;implementation{$R *.dfm}uses Clipbrd; {剪切板单元}//把窗体客户区保存为图片procedure TForm1.Button1Click(Sender: TObject);bit: TBitmap;beginbit := TBitmap.Create;bit := Self.GetFormImage;bit.SaveToFile('c:/temp/img1.bmp');bit.Free;end;//用一句话完成上一个过程procedure TForm1.Button2Click(Sender: TObject);beginSelf.GetFormImage.SaveToFile('c:/temp/img2.bmp');end;//把窗体客户区图像复制到剪切板procedure TForm1.Button3Click(Sender: TObject);varFormat: Word;Data: Cardinal;APalette: HPALETTE;begin{TBitmap.SaveToClipboardFormat 函数的三个参数都是接受数据用的, 按要求类型定义即可}GetFormImage.SaveToClipboardFormat(Format, Data, APalette);{放入剪切板}Clipboard.SetAsHandle(Format, Data);end;。

JavaScript+Html5实现按钮复制文字到剪切板功能（手机网页兼容）

JavaScript+Html5实现按钮复制⽂字到剪切板功能（⼿机⽹页兼容）新学习JavaScript，就碰到这么⼀个需求，⼏乎⽹上的⽅法都试过了。

写出了总结下使⽤的⽅法：clipboard引⼊插件：⽬录\clipboard.js-master\dist\clipboard.min.js⽬录中有各种demo，分别实现了固定的⽂字复制，input的复制等等，可以看下找找思路；下边来记录下使⽤的⽅式：⼀：引⼊插件：<script src="js/clipboard.min.js" type="text/javascript"></script>⼆：给标签添加属性：data-clipboard-text<div id="btn" data-clipboard-text="1"><span>Copy</span></div>三：定义script ：实现复制功能---（写的内部的script，外部的总是报错，找不到类，新⼿不⼤懂，以后再补充）<script>var clipboard = new Clipboard('btn');clipboard.on('success', function(e) {e.clearSelection();//复制成功});clipboard.on('error', function(e) {//复制失败});</script>补充：new Clipboard()----参数为id class都可以，跟css定义⼀样 id 或者.class四：⾃定义复制的内容；new Clipboard('.btn', {target: function(trigger) {return trigger.nextElementSibling;}});通过return返回想复制的内容，五：列表页复制每条列表内容可以给每个item⾃定义属性data-clipboard-text即可div.setAttribute("data-clipboard-text","asdf");补充：电脑浏览器⼏乎都可以⽀持，⼿机上安卓可以，苹果有点问题，需要把标签设置成button以上所述是⼩编给⼤家介绍的JavaScript+Html5实现按钮复制⽂字到剪切板功能(⼿机⽹页兼容)，希望对⼤家有所帮助，如果⼤家有任何疑问请给我留⾔，⼩编会及时回复⼤家的。

VUE实现复制内容到剪贴板的两种方法

VUE实现复制内容到剪贴板的两种⽅法VUE 复制内容⾄剪切板(两种使⽤⽅法)复制内容⾄剪切板使⽤的是插件'vue-clipboard2',通过官⽅⽂档会发现共有两种使⽤⽅式。

第⼀种⽅式与⼤多数⽂章类似，只粘贴代码：<template><div class="container"><input type="text" v-model="message"><button type="button"v-clipboard:copy="message"v-clipboard:success="onCopy"v-clipboard:error="onError">Copy!</button></div></template><script>export default {data() {return {message: 'Copy These Text',}},methods: {onCopy: function (e) {alert('You just copied: ' + e.text)},onError: function (e) {console.log(e)alert('Failed to copy texts')}}}</script>这种使⽤⽅式直接将变量内容复制⾄剪切板，暂时没有找到处理数据后再复制的⽅式，这时就需要使⽤第⼆种⽅式。

第⼆种⽅式：<template><div class="container"><input type="text" v-model="message"><button type="button" @click="doCopy('add me!')">Copy!</button></div></template><script>export default {data() {return {message: 'Copy These Text'}},methods: {dataProcessing (val) {this.message = this.message + ' ' + val},doCopy: function (val) {this.dataProcessing(val)this.$copyText(this.message).then(function (e) {alert('Copied')console.log(e)}, function (e) {alert('Can not copy')console.log(e)})}}}</script>通过这段⽰例代码能看到，复制动作使⽤的是VUE响应函数⽅式，这就为复制前控制数据提供了可能！下⾯在看下vue实现复制内容到剪贴板功能，具体内容如下所⽰：注：依赖第三⽅插件 clipboard⼀、安装插件npm install vue-clipboard2 --save⼆、全局注⼊（main.js）import VueClipboard from 'vue-clipboard2'e(VueClipboard)三、使⽤<ul class="file-list"><li v-for="(f, index) of files" :key="index"><span>[⽂件{{index + 1}}] {{f}}</span><span class="copy-btn" v-clipboard:copy="f" v-clipboard:success="onCopy" v-clipboard:error="onError">复制</span></li></ul>// 复制成功时的回调函数onCopy (e) {this.$message.success("内容已复制到剪切板！")},// 复制失败时的回调函数onError (e) {this.$message.error("抱歉，复制失败！")}四、效果图总结以上所述是⼩编给⼤家介绍的VUE 实现复制内容到剪贴板功能,希望对⼤家有所帮助，如果⼤家有任何疑问请给我留⾔，⼩编会及时回复⼤家的。

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

//文件列表为两个'\0'结尾，因此需要多分配2个字节
hGblFiles = GlobalAlloc(GMEM_ZEROINIT | GMEM_MOVEABLE | GMEM_DDESHARE,\
sizeof(DROPFILES)+strlen(szFileName)+2);
lpData = (LPSTR)GlobalLock(hGblFiles);
lpdDropEffect = (LPDWORD)GlobalLock(hGblEffect);
//设置操作的模式
*lpdDropEffect = DROPEFFECT_COPY;//复制; 剪贴则用DROPEFFECT_MOVE
GlobalUnlock(hGblEffect);
//剪贴板数据需要一个这个结构
stDrop.pFiles = sizeof(DROPFILES);//文件列表相对于结构的偏移量
stDrop.pt.x = 0;
stDrop.pt.y = 0;
stDrop.fNC = FALSE;
stDrop.fWide = FALSE;//宽字符设置
//分配数据空间，并且预留文件名的空间
}
memcpy(lpData,&stDrop,sizeof(DROPFILES));
strcpy(lpData+sizeof(DROPFILES),szFileName);
GlobalUnlock(hGblFiles);
//普通的剪贴板操作
OpenClipboard(NULL); 文件信息
SetClipboardData(CF_HDROP,hGblFiles);
//设置剪贴板操作信息
SetClipboardData(uDropEffect,hGblEffect);
CloseClipboard();
return 1;
int CopyFileToClipboard(char szFileName[])
{
UINT uDropEffect;
HGLOBAL hGblEffect;
LPDWORD lpdDropEffect;
DROPFILES stDrop;
HGLOBAL hGblFiles;
LPSTR lpData;
//与剪贴板交互的数据格式并非标准剪贴板格式，因此需要注册
uDropEffect = RegisterClipboardFormat("Preferred DropEffect");
//为剪贴板数据分配空间
hGblEffect = GlobalAlloc(GMEM_ZEROINIT | GMEM_MOVEABLE | GMEM_DDESHARE,sizeof(DWORD));