WebBrowserにソフトキーボード機能を持たせたい！

いたりん 2009-07-09 23:21:15 No: 35101

Delphi2009を使用してオリジナルブラウザを作成中です。コントロールは
TWebBrowser を使用しています。

WebBrowserコントロール内の文字入力エリアがクリックされたらソフト
キーボードを表示し、入力された文字を文字入力エリアにセットしたいの
ですが・・・

調べたら TUIWebBrowser の BrowserDomEvent で可能な用ですが、Delphi
2009には対応していませんでした。

いろいろ調べましたがわかりませんでした。どなたかアドバイスなどを
宜しく御願いします。

こんなのは？ 2009-07-10 00:41:53 No: 35102

これはどうですか？

いたりん 2009-07-10 05:00:13 No: 35103

有難うございます。

EmbeddedWB は選択肢としてあがったのですが、日本語の解説が
見つからず、よくわからないので、断念しました。

moocho 2009-07-16 22:31:13 No: 35104

// 編集モード
procedure TForm1.Button1Click(Sender: TObject);
begin
(WebBrowser1.Document as IHTMLDocument2).designMode := 'on';
end;

// 閲覧モード
procedure TForm1.Button2Click(Sender: TObject);
begin
(WebBrowser1.Document as IHTMLDocument2).designMode := 'off'
end;

// コピー
procedure TForm1.Button3Click(Sender: TObject);
begin
(WebBrowser1.Document as IHTMLDocument2).execCommand('Copy', True, EmptyParam);
end;

// 貼り付け
procedure TForm1.Button4Click(Sender: TObject);
begin
(WebBrowser1.Document as IHTMLDocument2).execCommand('Paste', False, EmptyParam);
end;

．．のような事が出来るようです。（試していません）