vb与html交互js点击截图,[js]javascript与剪贴板交互

1.怎样操作剪贴板，从而实现复制、剪切与粘贴?同时判断剪贴板里边的数据是否是文本？

if (!IsClipboardFormatAvailable(CF_TEXT))

return;

if (!OpenClipboard(hwndMain))

return;

hglb = GetClipboardData(CF_TEXT);

if (hglb != NULL)

{

lptstr = GlobalLock(hglb);

if (lptstr != NULL)

{

// Call the application-defined ReplaceSelection

// function to insert the text and repaint the

// window.

ReplaceSelection(hwndSelected, pbox, lptstr);

GlobalUnlock(hglb);

}

}

CloseClipboard();

2.可以使用javascript获得windows剪贴板里的字符串吗？

比如在网页中实现点击一个文本框 就把剪贴板里的字符粘贴进去

当然可以

3.javascript和剪贴板的交互

一般可以这样将id为‘objid'的对象的内容copy到剪贴板

var rng = document.body.createTextRange();

rng.moveToElementText(document.getElementById("objid"));

rng.scrollIntoView();

rng.select();

rng.execCommand("Copy");

rng.collapse(false);

setTimeout("window.status=''",1800)

也可以用rng.execCommand("Past");将剪贴板的内容粘到光标当前位置。

内容参见msdn 的textRange对象。

不过，copy到剪贴板的都是不带html标签的，所有html标签都将被过滤。

4.window.clipboardData.getData("Text") //可以获得剪贴版的文字

window.clipboardData.setData("Text","你的内容") //向剪贴板里写文本信息

5.怎么判断剪贴板中的数据是否为字符串而不是图片或别的信息？

Private Sub Command1_Click()

If Clipboard.GetFormat(vbCFText) Or Clipboard.GetFormat(vbCFRTF) Then

MsgBox "ok"

End If

End Sub

6.请问如何判断剪贴板中不为空？

一、

Eg

判断windows剪贴板里是否为空,没有则读取图片到Image中

uses clipbrd;

if ClipBoard.HasFormat(CF_Picture) then

Image1.Picture.Assign(ClipBoard);

二、

uses Clipbrd;

procedure TForm1.Button1Click(Sender: TObject);

begin

if Clipboard.FormatCount

您可能感兴趣的文章: