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

解決


たむたむ  2007-04-26 03:59:15  No: 25939  IP: [192.*.*.*]

環境:WindowsXp、IE7、Delphi7

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

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

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

編集    削除
おまじない  2007-04-26 04:46:20  No: 25940  IP: [192.*.*.*]

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

initialization
  OleInitialize(nil);

finalization
  OleUninitialize;
end.

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

編集    削除
たむたむ  2007-04-27 05:35:57  No: 25941  IP: [192.*.*.*]

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

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

  initialization
    OleInitialize(nil);
  finalization
    OleUninitialize;
  end.

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

編集    削除