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

■No30622 (ただいま落ちこぼれ中 さん) に返信

>すみません、書き忘れましたキーダウンはフォームのキーダウンを使用しております。
やっぱり

>入力した文字を判定して一致していたら表示している文字の色を変化させる
これを最初の質問に書いてほしかったな

「Hello」って入力されたら、赤文字に変換する。
TextChangeイベントを使ってます。
サンプルは、キーワードが全角文字だと駄目って課題が残ってるけど。

    public partial class Form1 : Form
    {
        private bool isChange_ = false;

        public Form1()
        {
            InitializeComponent();
        }

        private void richTextBox1_TextChanged(object sender, EventArgs e)
        {
            if (isChange_ == false)
            {
                isChange_ = true;
                keywordHighlighting(ref richTextBox1, "Hello");
            }
            isChange_ = false; 
 
        }

        // 共通関数 ：キーワードハイライティング 
        public void keywordHighlighting(ref RichTextBox richTextBox, string keyWord)
        {

            int index = 0;
            int ctbl = 0;
            string rtfRead = null;

            index = richTextBox.SelectionStart;

            // RTF形式のテキストを取得 
            rtfRead = richTextBox.Rtf;

            // 文字修飾クリア 
            rtfRead = rtfRead.Replace("\\cf1\\b ", "");
            rtfRead = rtfRead.Replace("\\\\b0\\cf0 ", "");
            //カラーテーブルを追加 
            ctbl = rtfRead.IndexOf("\\viewkind");
            if (ctbl != 0)
            {
                rtfRead = rtfRead.Substring(0, ctbl - 1) + "{\\colortbl ;\\red255\\green0\\blue0;}\n" + rtfRead.Substring(ctbl);
            }

            //Replace メソッドで文字列の置換 
            string rtf = null;
            string replaceWith = null;
            string pattern = null;
            Regex reg = null;

            pattern = "(" + keyWord + ")";
            replaceWith = "\\cf1\\b $1\\b0\\cf0 ";
            reg = new Regex(pattern, RegexOptions.IgnoreCase);

            rtf = reg.Replace(rtfRead, replaceWith);
            richTextBox.Rtf = rtf;
            richTextBox.SelectionStart = index;
        }
    }

■No30626 (ただいま落ちこぼれ中 さん) に返信
> すみません、書き忘れましたキーダウンはフォームのキーダウンを使用しております。
そんな気はしてた。

> かりにですがテキストのキーダウンを使ったとしてEnableをtrueにすると思ったことが出来ません
> （入力した文字を判定して一致していたら表示している文字の色を変化させる）

「仮にですが」を質問の最初から多用されてますが、本当にしてる処理は何なんでしょうか？

> そのままですと判定の前に入力した文字が入力されてしまいます。

これは当たり前の動作。

> ではその状態でReadOnlyをfalseにしたらどうなるか・・・ビープ音がやはり鳴ります。

俺の環境では鳴らないんだけどなぁ？
要は、こんな感じの事をしたいんだよね？(RichTextBox.Enable=false, Form.KeyPreview=true)

Private Sub Form2_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
    If e.KeyCode = Keys.A Then
        Me.RichTextBox1.SelectionStart = 2
        Me.RichTextBox1.SelectionLength = 2
        Me.RichTextBox1.SelectionColor = Color.Red
    End If
End Sub

何かいらんことしてないですか？
まず、問題を切り分ける事が先決なんじゃないのかな？

> サンプルは、キーワードが全角文字だと駄目って課題が残ってるけど。

全角に対応、「テスト」って入力されたら、赤文字に変換する。
C#は、まだ不慣れですね(^^;
でもって不具合とかあると思いますが、簡易サンプル的にはいいと思う。

    public partial class Form1 : Form
    {
        enum CharType
        {
            None,
            Hankaku,
            Zenkaku
        }

        private bool isChange_ = false;
        private string keyWord_ = null;


        public Form1()
        {
            InitializeComponent();

            keyWord_ = rtfEncoding("テスト");

        }

        private void richTextBox1_TextChanged(object sender, EventArgs e)
        {
            if (isChange_ == false)
            {
                isChange_ = true;
                keywordHighlighting(ref richTextBox1, keyWord_);
            }
            isChange_ = false; 
 
        }

        // 共通関数 ：キーワードハイライティング 
        public void keywordHighlighting(ref RichTextBox richTextBox, string keyWord)
        {

            int index = 0;
            int ctbl = 0;
            string rtfRead = null;

            index = richTextBox.SelectionStart;

            // RTF形式のテキストを取得 
            rtfRead = richTextBox.Rtf;

            // 文字修飾クリア 
            rtfRead = rtfRead.Replace("\\cf1\\b ", "");
            rtfRead = rtfRead.Replace("\\\\b0\\cf0 ", "");
            //カラーテーブルを追加 
            ctbl = rtfRead.IndexOf("\\viewkind");
            if (ctbl != 0)
            {
                rtfRead = rtfRead.Substring(0, ctbl - 1) + "{\\colortbl ;\\red255\\green0\\blue0;}\n" + rtfRead.Substring(ctbl);
            }

            //Replace メソッドで文字列の置換 
            string rtf = null;
            string replaceWith = null;
            string pattern = null;
            Regex reg = null;

            pattern = "(" + keyWord + ")";
            replaceWith = "\\cf1\\b $1\\b0\\cf0 ";
            reg = new Regex(pattern, RegexOptions.IgnoreCase);

            rtf = reg.Replace(rtfRead, replaceWith);
            richTextBox.Rtf = rtf;
            richTextBox.SelectionStart = index;
        }

        //キーワードをRTF形式文字列(正規表現の置換用)に変換
        string rtfEncoding(string keyWord)
        {
            //日本語RTFはシフトJISを使用
            Encoding sjis = Encoding.GetEncoding("Shift_JIS");
            string result = null;
            bool isFirst = false;
            CharType charType = CharType.None;  

            for (int i = 0; i < keyWord.Length; ++i)
            {
                byte[] bstr = sjis.GetBytes(keyWord.Substring(i, 1));
                if (bstr.Length > 1)
                {
                    //全角 2Byte
                    if (isFirst == false && charType == CharType.Hankaku)
                    {
                        isFirst = true;
                        result += "\\\\f1";
                    }
                    charType = CharType.Zenkaku;  
                    for (int j = 0; j < bstr.Length; ++j)
                        result += "\\\\'" + bstr[j].ToString("x");

                }
                else
                {
                    //半角 1Byte
                    if (isFirst == true && charType == CharType.Zenkaku)
                    {
                        result += "\\\\f0 ";
                    }
                    result += keyWord.Substring(i, 1);
                    charType = CharType.Hankaku;  
                    isFirst = false;
                }
            }

            return result;
        } 
    }