在webbrowser中显示的网页,选中其中文字进行复制好像不起作用,不管是用鼠标右键还是直接CTRL-C,都没有复制到剪切板去,无法粘贴出来。
在窗体的OnCreate事件中加入如下代码:
OleInitialize(nil);
在OnClose事件中加入代码:
OleUninitialize;
procedure TForm1.FormCreate(Sender: TObject);
begin
OleInitialize(nil);
end;
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
OleUninitialize;
end;

博客指出在webbrowser中显示的网页,使用鼠标右键或CTRL - C复制文字无法复制到剪切板。并给出解决办法,在窗体的OnCreate事件中加入OleInitialize(nil),在OnClose事件中加入OleUninitialize。

被折叠的 条评论
为什么被折叠?



