Selection Methoden innerhalb einer RichTextBox

  • Sonstige

    Selection Methoden innerhalb einer RichTextBox

    Hallo Zusammen !
    Ich habe folgendes Problem:
    Ich habe vor, die Pixel eines Bildes einzulesen und in farbigen Text wiederzugeben.
    Bisher bin ich allerdings nur soweit, dass der gesamte Text in Farbe des ersten Pixels [1;1] gefärbt wird:

    Visual Basic-Quellcode

    1. For h As Integer = 1 To pbImage.Image.Height
    2. For w As Integer = 1 To pbImage.Image.Width
    4. Dim b As Bitmap = pbImage.Image
    5. Dim c As New Color
    7. c = b.GetPixel(w - 1, h - 1)
    9. tbOut.Text = tbOut.Text + "##"
    11. tbOut.SelectionStart = tbOut.TextLength - 2
    12. tbOut.SelectionLength = 2
    13. tbOut.SelectionColor = c
    14. tbOut.SelectionStart = tbOut.TextLength
    16. tbOut.Update()
    18. ProgressBar1.Value = h
    20. Text = w.ToString + ":" + h.ToString + " " + c.ToString
    22. Next
    23. tbOut.Text = tbOut.Text + vbCrLf
    24. Next


    Kann mir da jemand sagen, was ich falsch mache ?