Lebans RTF Control

[dynamicpool]

I am using the Lebans RTF in a report which is written from code. I need to
format the text in code and have been fooling around with

Dim sNormalText As String
Dim sBoldText As String
Dim sItalicText As String

sNormalText = "This is normal text."
sBoldText = "This is bold text."
sItalicText = "This is italic text."

Me.rtfRecommend.RTFtext = "{\rtf" & _
"\pard \b " & sBoldText & "\b0\par" & _
"\pard\ " & sNormalText & "\par" & _
"\pard \i " & sItalicText & "\i0\par}"

This seems to be working, except the default font for the control seems to
be System, and I am having a a devil of a time trying to change it in code.

System does not have regular as a font choice.

 

[Stephen Lebans]

If you search on GoogleGroups you will find several threads with
solutions on this issue.
Lebans RTF Default font

I'm adding a Default Font property to the next release but I am
currently busy finishing another project so it may be a week or so.

--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.

 

[dynamicpool]

Thanks for that Stephen.

Unfortunately the links on google point to an archive of dbforums for the
most part. The dbforums site has recently been upgraded and the links are
no longer valid.

 

[Stephen Lebans]

Sorry about that. I gave you the wrong Keywords!!
http://groups.google.com/groups?num=100&hl=en&lr=&ie=UTF-8&oe=UTF-8&scor
ing=d&q=lebans+stdfont+group%3A*access*
Lebans stdfont

--

HTH
Stephen Lebans
http://www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.