[AccessD] Moving on to Fonts

[John Colby]

I'm confused Stuart.  I see your code setting the text box.  Then reading
back what you set into the text box?

I can do that as well.

What I am saying is that when I then click into the box, make modifications
to what is displayed in the text box using the editor controls in the
toolbar, and THEN read back the textbox contents, it is identical to what I
originally wrote in there, even though it is rendering something different.

On Tue, Jul 12, 2022 at 11:15 PM Stuart McLachlan <stuart at lexacorp.com.pg>
wrote:

> On 12 Jul 2022 at 22:31, John Colby wrote:
>
> > yesy but... mod it with the editor and then try to get back whatever
> > is now being rendered!
> >
>
>
> Hmm, works fine for me:
> Click Command5. Sets bound and unbound text boxes
> Click Command6.  Debug prints set text
> Add a bit of text to each
> Click Command6.  Debug prints new text
>
>
>
> Private Sub Command5_Click()
> txtUBRTF = "<div><font face=Algerian>This is a rich </font><font
> face=Calibri
> color=""#ED1C24"">text</font><font face=Algerian> field</font></div>"
> txtRTF2 = "<div><font face=Algerian>This is a rich </font><font
> face=Calibri
> color=""#ED1C24"">text</font><font face=Algerian> field</font></div>"
> End Sub
>
> Private Sub Command6_Click()
> Debug.Print " Unbound: " & txtUBRTF
> Debug.Print
> Debug.Print "Bound:" & txtRTF2
> Debug.Print "----------------------------"
> End Sub
>
> --------------------------------------------------
>  Unbound: <div><font face=Algerian>This is a rich </font><font
> face=Calibri
> color="#ED1C24">text</font><font face=Algerian> field</font></div>
>
> Bound:<div><font face=Algerian>This is a rich </font><font face=Calibri
> color="#ED1C24">text</font><font face=Algerian> field</font></div>
> ----------------------------
>  Unbound: <div><font face=Algerian>This is a rich </font><font
> color="#ED1C24">text</font><font
> face=Algerian> field with an addition</font></div>
>
> Bound:<div><font face=Algerian>This is a rich </font><font
> color="#ED1C24">text</font><font
> face=Algerian> field with extra text</font></div>
> ----------------------------
>
>
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> https://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>


-- 
John W. Colby
Colby Consulting