none
Access 2010 RTF Feld Schriftart/Grösse

    Frage

  • Hallo

    ich habe ein Formular mit dem RTF/html Textfeld von MS

    wenn ich beim öffnen des Formulares dem Textfeld die Schriftart/Größe zuweise

    If IsNull(Text) = True Then
         Text.FontName = GBRTFStandartFontNameBrief
         Text.FontSize = GBRTFStandartFontGroesseBrief
    End If

    schreibt er das auch in der zugewiesenen Schriftart/Größe beim verlassen des Formulares ändert er die Schriftart/Größe wieder auf die Ursprüngliche zurück

    Mittwoch, 26. Februar 2014 11:23

Alle Antworten

  • Ich habe es für mich jetzt so gelöst das ich MEINE Schriftart und Schriftgrösse beim öffnen als html übergebe

    If IsNull(Text) = True Then
        Select Case GBRTFStandartFontGroesseBrief
              Case 8, 9
                    Text.Text = "<div><font face=""" & GBRTFStandartFontNameBrief & """ size=1></font></div>"
              Case 10, 11
                    Text.Text = "<div><font face=""" & GBRTFStandartFontNameBrief & """ size=2></font></div>"
              Case 12, 13
                    Text.Text = "<div><font face=""" & GBRTFStandartFontNameBrief & """ size=3></font></div>"
              Case 14, 15
                    Text.Text = "<div><font face=""" & GBRTFStandartFontNameBrief & """ size=4></font></div>"
              Case 16, 17, 18
                    Text.Text = "<div><font face=""" & GBRTFStandartFontNameBrief & """ size=5></font></div>"
              Case 19, 20, 21, 22, 23, 24
                    Text.Text = "<div><font face=""" & GBRTFStandartFontNameBrief & """ size=6></font></div>"
              Case Else
                    Text.Text = "<div><font face=""" & GBRTFStandartFontNameBrief & """ size=7></font></div>"
        End Select
    End If

    Donnerstag, 27. Februar 2014 14:06