C# と VB.NET の質問掲示板

■No39643 (魔界の仮面弁士 さん) に返信
> ■No39642 (RT さん) に返信
>>    private void button1_Click_1(object sender, EventArgs e)
>>        {
>>        1    //ブラウザに、ウェブページを表示
>>        2    webBrowser_Main.Navigate(new Uri(Cmb_Url.Text));
>>        3    HtmlElementCollection texts = webBrowser_Main.Document.GetElementsByTagName("TD");
>>        4    texts[0].Focus(); 
>>        }
>>ですが3行目で、次のようなエラーが出てしまいます。
>>[オブジェクト参照がオブジェクト インスタンスに設定されていません。]
> 
> Navigate した直後は、まだ HTML の読み込みが完了していないためです。
> Click イベントでは、Navigate メソッドの呼び出しのみを行うようにして、
> Document プロパティを操作するコードは、DocumentCompleted イベント内に記述してください。
> 
> (DocumentCompleted は、ドキュメントが完全に読み込まれた時に発生するイベントです)

魔界の仮面弁士 さんのアドバイスに従い、下のように書き換えました。

  private void button1_Click_1(object sender, EventArgs e)
        {
            //ブラウザに、ウェブページを表示
            webBrowser_Main.Navigate(new Uri(Cmb_Url.Text));
        }

        private void DocumentCompleted(object sender, EventArgs e)
        {
            HtmlElementCollection texts = webBrowser_Main.Document.GetElementsByTagName("TD");
            texts[0].Focus();
        }

おかげ様で、エラーは回避出来たのですが、ページの文章にフォーカスが当たりません。
何がいけないのでしょうか？

■No39645 (RT さん) に返信
> おかげ様で、エラーは回避出来たのですが、ページの文章にフォーカスが当たりません。
たとえば、
　　textBox1.Focus();    // もしくは  this.ActiveControl = textBox1;
とすれば、テキストボックスにフォーカスが当たりますよね。

しかしながら、
　　label1.Focus();      //もしくは  this.ActiveControl = label1;
とした場合、ラベルにフォーカスは当たりますが、ラベルがアクティブである事は視認できません。


それと同様、たとえ focus() しても、相手が <TD> タグでは
フォーカスが当たった事は視認できないと思いますよ。

せいぜい、TD タグの位置によっては、スクロールが発生するかも知れない、という程度でしょう。

# もしかして、本当にやりたい事は TD にフォーカスを設定する事ではなく、
# TD 内のテキストを選択状態にする事なのかな…?

■No39654 (RT さん) に返信
> TD内のテキストに蛍光ペンを引いたような状態にしたいのです。

TD そのものに背景色を設定してしまうとか。

private void button1_Click(object sender, EventArgs e)
{
    webBrowser1.Navigate("http://bbs.wankuma.com/");
}

private void webBrowser1_DocumentCompleted(object sender, WebBrowserDocumentCompletedEventArgs e)
{
    HtmlElement tag = webBrowser1.Document.GetElementsByTagName("TD")[0];
    tag.Style += ";background-color:" + ColorTranslator.ToHtml(Color.LightGreen);
}

おや？背景変わりません？
ウチの環境だと左上の「掲示板トップ」の部分の背景の色が緑に変わりますけど。

※おまけ
foreach (HtmlElement elm in webBrowser1.Document.GetElementsByTagName("TD")) {
    elm.Style += ";background-color:" + ColorTranslator.ToHtml(Color.LightGreen);
}

というコードを実行すればテーブル内全部緑なると思ったらなぜか「記事数」の中だけ
背景色が変わらない。ソース見たらここだけTHのみでTDタグ使ってないんですね。

■No39656 (魔界の仮面弁士) に追記
> TD そのものに背景色を設定してしまうとか。

※おまけ

セル背景ではなく、セル内のテキスト部分に背景色をつけるコード。

private void webBrowser1_DocumentCompleted(object sender, WebBrowserDocumentCompletedEventArgs e)
{
    HtmlElementCollection tags = webBrowser1.Document.GetElementsByTagName("TD");
    if (tags.Count == 0) return;
    tags[0].Focus();

    // 参照設定として[Microsoft HTML Object Library]が必要です。
    mshtml.IHTMLDocument2 dom = (mshtml.IHTMLDocument2)webBrowser1.Document.DomDocument;
    mshtml.IHTMLSelectionObject selectionObject = dom.selection;
    mshtml.IHTMLTxtRange txtRange = (mshtml.IHTMLTxtRange)selectionObject.createRange();
    mshtml.IHTMLElement tag = (mshtml.IHTMLElement)tags[0].DomElement;
    txtRange.moveToElementText(tag);
    txtRange.execCommand("BackColor", false, ColorTranslator.ToHtml(Color.Yellow));
    /*
    System.Runtime.InteropServices.Marshal.ReleaseComObject(tag);
    System.Runtime.InteropServices.Marshal.FinalReleaseComObject(txtRange);
    System.Runtime.InteropServices.Marshal.FinalReleaseComObject(selectionObject);
    System.Runtime.InteropServices.Marshal.ReleaseComObject(dom);
    */
}


WebBrowser 側でどのように実装されているのか良く分からなかったので、
(Final)ReleaseComObject メソッドを呼ぶべきかどうか判断が付かなかった…。

# txtRange/selectionObject はカプセル化されて無さそうなので、解放できそうだけれども、
# DomDocument/DomElement から受け取ったオブジェクトは、利用側で減じて良いのだろうか?

■No39674 (RT さん) に返信
> >>また、コード中の[0]は何を意味しているのでしょうか？
>>RTさん自身が No39642 で書いていた [0] と同じ意味です。
> コピペしたので、使った自分自身意味がわかっていないのです。

HTML ページ内に、TD タグは複数ありますよね。(0個の事もありますが)

GetElement『s』ByTagName メソッドというだけあって、このメソッドの戻り値は
複数の要素をコレクションとして返します。

そこで、複数存在した TD タグのうち、最初に見つかった物(0番目のもの)を扱うために、
[0] というインデクサ指定を行っているのです。

>>※おまけ
>>foreach (HtmlElement elm in webBrowser1.Document.GetElementsByTagName("TD")) {
>>   elm.Style += ";background-color:" + ColorTranslator.ToHtml(Color.LightGreen);
>>}
> 教えてもらった、このプログラムを実行すると、全部背景色が変わってしまいました。
そりゃまぁ、全部のセル背景色を変えるためのコードですから。


> 結果、背景色を変えるのは、ユーザーに変更箇所を知らせるために、有効ではないことが分りました。
> 何か他の方法はないでしょうか？例えば、色を反転するとか。
『色の反転』とは、具体的にはどういう状態を指していますか?

■No39678 (魔界の仮面弁士 さん) に返信
> ■No39656 (魔界の仮面弁士) に追記
>>TD そのものに背景色を設定してしまうとか。
> 
> ※おまけ
> 
> セル背景ではなく、セル内のテキスト部分に背景色をつけるコード。
> 
> private void webBrowser1_DocumentCompleted(object sender, WebBrowserDocumentCompletedEventArgs e)
> {
>     HtmlElementCollection tags = webBrowser1.Document.GetElementsByTagName("TD");
>     if (tags.Count == 0) return;
>     tags[0].Focus();
> 
>     // 参照設定として[Microsoft HTML Object Library]が必要です。
>     mshtml.IHTMLDocument2 dom = (mshtml.IHTMLDocument2)webBrowser1.Document.DomDocument;
>     mshtml.IHTMLSelectionObject selectionObject = dom.selection;
>     mshtml.IHTMLTxtRange txtRange = (mshtml.IHTMLTxtRange)selectionObject.createRange();
>     mshtml.IHTMLElement tag = (mshtml.IHTMLElement)tags[0].DomElement;
>     txtRange.moveToElementText(tag);
>     txtRange.execCommand("BackColor", false, ColorTranslator.ToHtml(Color.Yellow));
>     /*
>     System.Runtime.InteropServices.Marshal.ReleaseComObject(tag);
>     System.Runtime.InteropServices.Marshal.FinalReleaseComObject(txtRange);
>     System.Runtime.InteropServices.Marshal.FinalReleaseComObject(selectionObject);
>     System.Runtime.InteropServices.Marshal.ReleaseComObject(dom);
>     */
> }
> 
> 
> WebBrowser 側でどのように実装されているのか良く分からなかったので、
> (Final)ReleaseComObject メソッドを呼ぶべきかどうか判断が付かなかった…。
> 
> # txtRange/selectionObject はカプセル化されて無さそうなので、解放できそうだけれども、
> # DomDocument/DomElement から受け取ったオブジェクトは、利用側で減じて良いのだろうか?


アドバイスに従い、以下のようにコードを書いて、ページ内の文字を蛍光ペンで塗りつぶした感じが実現出来ました。ありがとうございます。

 private void webBrowser_Main_DocumentCompleted(object sender, WebBrowserDocumentCompletedEventArgs e)
        {
            foreach (HtmlElement tags in webBrowser_Main.Document.GetElementsByTagName("TD"))
            {
                mshtml.IHTMLDocument2 dom = (mshtml.IHTMLDocument2)webBrowser_Main.Document.DomDocument;
                mshtml.IHTMLSelectionObject selectionObject = dom.selection;
                mshtml.IHTMLTxtRange txtRange = (mshtml.IHTMLTxtRange)selectionObject.createRange();
                mshtml.IHTMLElement tag = (mshtml.IHTMLElement)tags.DomElement;
                txtRange.moveToElementText(tag);
                txtRange.execCommand("BackColor", false, ColorTranslator.ToHtml(Color.Wheat));
            }

        }

次に、イメージファイルも同じようにしたいのですが、ちょっとコードを変えるだけで出来るでしょうか？
それとも、イメージファイルの場合は、背景色が変わっても、見た目は変わらないでしょうか？
もしくは枠の色を変えるとか出来るでしょうか？