got some funny error messages there. are you suggesting at point directly after createobject?
or after define class? both met with resistance. tnx naomi
k

>Are you still building your forms using code rather than form's designer?
>
>In any case, try adding code in the form's Init
>

>for each loOption in thisform.opgMyOptGrp.Options
>   loOption.FontName = 'Arial'
>   loOption.FontSize = 12
>next

>
>this is from the top of my head, so may need some adjusting.
>
>>i am trying to change the font of my form and seem only to achieve control of the text above theoption buttons.
>>Can you please tell me how to fix this
>>thanks k
>>
>>

>>frmMyForm = Createobject('Form')  && Create a Form
>>frmMyForm.Closable = .F.  && Disable the window pop-up menu
>>frmMyForm.BorderStyle = 3
>>frmMyForm.FontSize=10  && this will apply only to text above the option group
>>frmMyForm.AddObject('cmdCommand1','cmdMyCmndBtn')  && Add Command button
>>frmMyForm.AddObject('opgOptionGroup1','opgMyOptGrp') && Add Option Group
>>

>>
>>i had assumed the font controls (type size) went into the group definition
>>

>>
>>Define Class opgMyOptGrp As OptionGroup  && Create an Option Group
>>	ButtonCount = 13 && number of Option buttons
>>	Top = 22
>>	Left = 14
>>	Height = 275
>>	Width = 243
>>                    fontsize = 12 &&&& this has no effect
>>                   font = "Arial"   &&& this has no effect
>>