WebBrowserコンポーネント上のテキストコピーするには？

解決

たむたむ 2007-04-25 18:59:15 No: 25939 IP: 192.*.*.*

環境：WindowsXp、IE7、Delphi7

WebBrowserコンポーネントを貼り付けてウェブブラウザを作成しました。

表示されているテキストをマウスで反転させ、
「Ctrl+C」や「右クリック→コピー」を行っても、
クリップボードにテキストがコピーされません。

解決法ありましたら、ご教示お願いいたします。

編集削除

おまじない 2007-04-25 19:46:20 No: 25940 IP: 192.*.*.*

uses  ActiveX;
..........
..........

initialization
  OleInitialize(nil);

finalization
  OleUninitialize;
end.

もし、ご利益なければ…
WebBrowser1.ExecWB(OLECMDID_COPY, OLECMDEXECOPT_PROMPTUSER);

編集削除

たむたむ 2007-04-26 20:35:57 No: 25941 IP: 192.*.*.*

ありがとうございます！！！
おまじない、効果ありました。

最初、↓をどこに書けば良いのかわからなかったのですが、
ググってみた所、Unit1の一番最後に付ければ良さそうなので、そうしました。
このコードが何を意味するのか、また勉強せねば^^;;

  initialization
    OleInitialize(nil);
  finalization
    OleUninitialize;
  end.

ありがとうございました〜(^-^)

編集削除