вот нашел еще в
Delphi FAQ - Часто задаваемые вопросы:
Код:
uses
ActiveX,
begin
WebBrowser1.Navigate('http://www.delphisources.ru/forum/showthread.php?p=89657#post89657');
while WebBrowser1.ReadyState<READYSTATE_COMPLETE do Application.ProcessMessages;
WebBrowser1.ExecWB(OLECMDID_SELECTALL, OLECMDEXECOPT_DODEFAULT);
WebBrowser1.ExecWB(OLECMDID_COPY, OLECMDEXECOPT_DODEFAULT);
ShowMessage('copied');
end;
initialization
OleInitialize(nil);
оригинал:
http://www.delphisources.ru/pages/fa...ebbrowser.html
в Microsoft Office Word 2003 вставляет все.