Rich Text Box - Lebans

Collapse
This topic is closed.
X
X
Collapse
 
  • Page of 1
  • Time
  • Show
Clear All
new posts
Previous template Next
  • NB
    #1

    Rich Text Box - Lebans

    Hi,
    Is it possible to set the default font size and name, etc for the
    Leban's Rich Text box. I am using the latest version 1.5 but the
    following code does not work (but also produces no errors.)

    Dim x As RTF2
    Dim fnt As New StdFont

    Set x = Me!rchtxtCalend ar.Object
    With fnt
    .Name = "arial"
    .Size = 44
    .Italic = False
    .Bold = False
    .Strikethrough = False
    .Underline = False
    End With

    set x.Font = fnt


    Thanks
    Nigel
    Tags: None
    • Stephen Lebans
      #2
      Re: Rich Text Box - Lebans

      Sorry, that Prop has not been hooked up yet. I'll add it to the next
      release.

      --

      HTH
      Stephen Lebans
      http://www.lebans.com

      Access Code, Tips and Tricks
      Please respond only to the newsgroups so everyone can benefit.


      "NB" <nbnksd@aol.com > wrote in message
      news:5413ffd3.0 403011157.5b3b3 09b@posting.goo gle.com...[color=blue]
      > Hi,
      > Is it possible to set the default font size and name, etc for the
      > Leban's Rich Text box. I am using the latest version 1.5 but the
      > following code does not work (but also produces no errors.)
      >
      > Dim x As RTF2
      > Dim fnt As New StdFont
      >
      > Set x = Me!rchtxtCalend ar.Object
      > With fnt
      > .Name = "arial"
      > .Size = 44
      > .Italic = False
      > .Bold = False
      > .Strikethrough = False
      > .Underline = False
      > End With
      >
      > set x.Font = fnt
      >
      >
      > Thanks
      > Nigel[/color]

        Comment

        • Stephen Lebans
          #3
          Re: Rich Text Box - Lebans

          I hooked up the SetFont prop tonight. It now accepts a StdFont object as
          the input as per your example. Some more testing is required before
          release but I will try to put the new version on my site tomorrow night
          or Wed at the latest.
          :-)
          --

          HTH
          Stephen Lebans
          http://www.lebans.com

          Access Code, Tips and Tricks
          Please respond only to the newsgroups so everyone can benefit.


          "NB" <nbnksd@aol.com > wrote in message
          news:5413ffd3.0 403011157.5b3b3 09b@posting.goo gle.com...[color=blue]
          > Hi,
          > Is it possible to set the default font size and name, etc for the
          > Leban's Rich Text box. I am using the latest version 1.5 but the
          > following code does not work (but also produces no errors.)
          >
          > Dim x As RTF2
          > Dim fnt As New StdFont
          >
          > Set x = Me!rchtxtCalend ar.Object
          > With fnt
          > .Name = "arial"
          > .Size = 44
          > .Italic = False
          > .Bold = False
          > .Strikethrough = False
          > .Underline = False
          > End With
          >
          > set x.Font = fnt
          >
          >
          > Thanks
          > Nigel[/color]

            Comment

            • NB
              #4
              Re: Rich Text Box - Lebans

              Thanks for your quick responses. Its a great control.

                Comment

                Previous template Next
                Working...