that's very complex solution Koen - don't really want to go there.
thanks though
k
>>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
>>

>
>Hi,
>
>You could also consider to make use of Gregory L Reichert's class Styles which enables you to set all fontcharacteristics on your form with one, or maybe two :) mouseclicks.
>Styles class can be downloaded at : http://www.glrsoftware.com/download.asp#AppStart.zip Look on that page for DL2619 "Changing Colors and Styles at run-time"
>
>Regards,
>
>Koen