none
Schriftgrösse in RichTextBox via ListBox RRS feed

  • Frage

  • Hi zusammen, bin neu hier und bin dabei mein erstes Projekt abzuschliessen: einen klassischen Editor doch etwas wichtiges fehlt noch: das ändern der Schriftgrösse. Dazu verwende ich eine Listbox ziel wäre es dass der Text der Listbox als Schriftgrösse für den markierten Text verwendet wird. Es soll sich nur!!! die schriftgrösse ändern, der rest ist bereits programmiert.

    so wiet bin ich im moment:

     

    Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged 
      Dim schriftgrösse As Integer = ListBox1.Text 
      RichTextBox1.Fontsize = schriftgrösse
    End Sub

     

    in der library hab ich auch nichts gefunden geschweige denn im web, bitte helft mir!!!!

    Sonntag, 8. August 2010 10:01

Antworten

  • Hallo,

    Hi zusammen, bin neu hier und bin dabei mein erstes Projekt abzuschliessen: einen klassischen Editor doch etwas wichtiges fehlt noch: das ändern der Schriftgrösse. Dazu verwende ich eine Listbox ziel wäre es dass der Text der Listbox als Schriftgrösse für den markierten Text verwendet wird. Es soll sich nur!!! die schriftgrösse ändern, der rest ist bereits programmiert.

    egal, welche Eigenschaft des Fonts Du ändern möchtest, Du musst immer ein neues Font-Objekt erzeugen. Dabei kannst Du auf die Eigenschaften des bestehenden Fonts zurückgreifen:

      RichTextBox1.SelectionFont = New Font(RichTextBox1.SelectionFont.Name, _
                         18, _
                         RichTextBox1.SelectionFont.Style, _
                         RichTextBox1.SelectionFont.Unit)


    Thorsten Dörfler
    Microsoft MVP Visual Basic
    vb-faq.de
    Sonntag, 8. August 2010 11:11
    Moderator