小编Hil*_*are的帖子

使用 Delphi FireMonkey，我需要将 HTML 格式的字符串复制到 Delphi 中的剪贴板，以便粘贴它的其他应用程序会将其视为 HTML。

我已经尝试通过隐藏的备忘录组件复制简单文本，它可以工作，但被复制为简单文本。我需要 HTML 格式的副本。将其作为文本粘贴到任何富文本程序中时，它会显示所有 HTML 标记而不是格式化文本。

我当前将文本复制到剪贴板的方法是：

procedure TForm1.Button1Click(Sender: TObject);
var
  SourceText: string;
begin
  SourceText := 'This is a <b>bold</b> html line';
  //I can use TMemo to copy it to clipboard like:
  Memo1.lines.Text := SourceText;
  Memo1.SelectAll;
  memo1.CopyToClipboard;
end;

但问题是，如果我将剪贴板上复制的文本粘贴到 Microsoft Word 中，它将被粘贴为：

• “这是一个<b>bold</b>html 行”。我想要并且应该是这样的：

• 这是一个粗体的html 行

注意：我已经阅读了有关如何在 Windows 中完成此操作的其他讨论，但我需要一个用于跨平台应用程序的 Firemonkey 解决方案。任何帮助表示赞赏。