Font for Control

[foxfire]

I have two fields. One is a memo field that contains text typed by the user. The other is a character field that contains the name of the font they want the text to print as. I want the font to change on the screen when they select a new one. The value of the font is stored as mytable.fontname and the memo field is mytable.thedata.

After they pick a font name, I say thisform.refresh. In the refresh, I say: thisform.PageFrame1.Page1.Edit1.FontName=mytable.fontname

The font does not change on the screen. I've checked the value of .FontName for the control and it is the font the I picked. Is it possible to change the font used after the form has been created?

I did try thisform.PageFrame1.Page1.refesh and that made no difference.

Thanks

 

[foxfire]

Found my solution 2 seconds after I posted. I put ALLT() around the field name when setting the font. I used thisform.PageFrame1.Page1.Edit1.FontName=ALLT(mytable.fontname) and all works.