掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
webbrowserで表示中のソースにコードを挿入するには (ID：27145)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
環境はDelphi 6 Personalです。 WebBrowserに表示している画面を 次のコードで //編集モードにする procedure TForm1.SetDesignMode(Value: Boolean); var HTML: IHTMLDocument2; //uses節にmshtml_TLB ,が必要 begin HTML := WebBrowser1.Document as IHTMLDocument2; HTML.designMode := 'On' end; で編集可能状態にして。 カーソル位置のソースに＜Br＞（実際は半角）をいれて ソース上に改行コードを挿入したいのですが可能でしょうか。 解決方法を教えてくださいませんか。 過去ログに下記の例がありますが //文字を挿入する procedure TForm1.Button2Click(Sender: TObject); var tmp:OleVariant; begin Clipboard.AsText := Edit1.Text; WebBrowser1.ExecWB(OLECMDID_PASTE, OLECMDEXECOPT_DONTPROMPTUSER , tmp, tmp); end; これは、画面上に文字を挿入する例でした。 よろしくお願いします。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.