【发布时间】:2012-11-11 15:08:20
【问题描述】:
我想将 HTML 格式的富文本放在剪贴板上,这样当用户粘贴到 Word 时,它将包含源 HTML 格式。
使用the Clipboard.SetText method 不起作用。
另外,我希望如果用户粘贴到 Word 等富编辑器中,它将粘贴格式化文本,如果他们粘贴到记事本等普通编辑器中,它将粘贴纯文本。
【问题讨论】:
我想将 HTML 格式的富文本放在剪贴板上,这样当用户粘贴到 Word 时,它将包含源 HTML 格式。
使用the Clipboard.SetText method 不起作用。
另外,我希望如果用户粘贴到 Word 等富编辑器中,它将粘贴格式化文本,如果他们粘贴到记事本等普通编辑器中,它将粘贴纯文本。
【问题讨论】:
在设置 HTML 文本时,您需要提供一个标题,其中包含您实际要粘贴的 html 片段的附加信息,同时能够围绕它提供附加样式:
Version:0.9
StartHTML:000125
EndHTML:000260
StartFragment:000209
EndFragment:000222
<HTML>
<head>
<title>HTML clipboard</title>
</head>
<body>
<!–StartFragment–><b>Hello!</b><!–EndFragment–>
</body>
</html>
使用标头(和正确的索引),用TextDataFormat.Html 调用Clipboard.SetText 就可以了。
要处理 HTML 和纯文本粘贴,您不能使用 Clipboard.SetText 方法,因为每次调用它都会清除剪贴板;您需要创建一个DataObject 实例,使用HTML 调用其SetData 方法一次,然后使用纯文本调用一次,然后使用Clipboard.SetDataObject 将对象设置为剪贴板。
更新
请参阅“Setting HTML/Text to Clipboard revisited”了解更多详细信息和 ClipboardHelper 实现。
【讨论】:
此代码处理更新开始和结束索引的问题。
转换成c#:
public void AddHyperlinkToClipboard(string link, string description)
{
const string sContextStart = "<HTML><BODY><!--StartFragment -->";
const string sContextEnd = "<!--EndFragment --></BODY></HTML>";
const string m_sDescription = "Version:1.0" + Constants.vbCrLf + "StartHTML:aaaaaaaaaa" + Constants.vbCrLf + "EndHTML:bbbbbbbbbb" + Constants.vbCrLf + "StartFragment:cccccccccc" + Constants.vbCrLf + "EndFragment:dddddddddd" + Constants.vbCrLf;
string sHtmlFragment = "<A HREF=" + Strings.Chr(34) + link + Strings.Chr(34) + ">" + description + "</A>";
string sData = m_sDescription + sContextStart + sHtmlFragment + sContextEnd;
sData = sData.Replace("aaaaaaaaaa", m_sDescription.Length.ToString().PadLeft(10, '0'));
sData = sData.Replace("bbbbbbbbbb", sData.Length.ToString().PadLeft(10, '0'));
sData = sData.Replace("cccccccccc", (m_sDescription + sContextStart).Length.ToString().PadLeft(10, '0'));
sData = sData.Replace("dddddddddd", (m_sDescription + sContextStart + sHtmlFragment).Length.ToString().PadLeft(10, '0'));
sData.Dump();
Clipboard.SetDataObject(new DataObject(DataFormats.Html, sData), true );
}
【讨论】:
让我分享一个将剪贴板数据设置为 HTML 的助手,这是我刚刚为我的小项目 #DevComrade 提出的:
var dataObject = new DataObject();
dataObject.SetData(DataFormats.Html, ClipboardFormats.ConvertHtmlToClipboardData(html);
Host.SetClipboardDataObject(dataObject);
internal static class ClipboardFormats
{
static readonly string HEADER =
"Version:0.9\r\n" +
"StartHTML:{0:0000000000}\r\n" +
"EndHTML:{1:0000000000}\r\n" +
"StartFragment:{2:0000000000}\r\n" +
"EndFragment:{3:0000000000}\r\n";
static readonly string HTML_START =
"<html>\r\n" +
"<body>\r\n" +
"<!--StartFragment-->";
static readonly string HTML_END =
"<!--EndFragment-->\r\n" +
"</body>\r\n" +
"</html>";
public static string ConvertHtmlToClipboardData(string html)
{
var encoding = new System.Text.UTF8Encoding(encoderShouldEmitUTF8Identifier: false);
var data = Array.Empty<byte>();
var header = encoding.GetBytes(String.Format(HEADER, 0, 1, 2, 3));
data = data.Concat(header).ToArray();
var startHtml = data.Length;
data = data.Concat(encoding.GetBytes(HTML_START)).ToArray();
var startFragment = data.Length;
data = data.Concat(encoding.GetBytes(html)).ToArray();
var endFragment = data.Length;
data = data.Concat(encoding.GetBytes(HTML_END)).ToArray();
var endHtml = data.Length;
var newHeader = encoding.GetBytes(
String.Format(HEADER, startHtml, endHtml, startFragment, endFragment));
if (newHeader.Length != startHtml)
{
throw new InvalidOperationException(nameof(ConvertHtmlToClipboardData));
}
Array.Copy(newHeader, data, length: startHtml);
return encoding.GetString(data);
}
}
【讨论】:
Arthur 关于标题是正确的,但这里要注意的重要一点是数据不会以纯文本形式出现在剪贴板上。您必须使用 CF_HTML。您可以在 MSDN 上阅读相关内容:http://msdn.microsoft.com/en-us/library/aa767917(v=vs.85).aspx 正确地说,您将有一个 CF_TEXT 简单地显示:“Hello!”,然后是带有 HTML 标题和数据的 CF_HTML,如 Arthur 的示例所示。
【讨论】:
正如亚瑟所说,我使用了Setting HTML/Text to Clipboard revisited的代码
我必须在 Header 中添加换行符才能使其工作(在本例中为 VB)
Private Const Header As String = "Version:0.9" & vbCrLf & "StartHTML:<<<<<<<<1" & vbCrLf & "EndHTML:<<<<<<<<2" & vbCrLf & "StartFragment:<<<<<<<<3" & vbCrLf & "EndFragment:<<<<<<<<4" & vbCrLf & "StartSelection:<<<<<<<<3" & vbCrLf & "EndSelection:<<<<<<<<4"
希望对你有帮助
【讨论】: