Thanks Alan,
Yes I will do this.
I just don't like the idea that changing a baseclass can stop you even loading a form in form designer. :(
Oh well.. better get started then!
>Oh, yes, I almost forgot. BACKUP! BACKUP! BACKUP!
>One other thing, this will work fine under normal conditions, but it just occurred to me that you might want to change the line that reads:
>
>if 'ButtonCount =' $ lcTempString
>
>to be:
>
>If Left(lcTempString, 13) == "ButtonCount ="
>
>It might save some confusion in some oddball case.
>
>Alan
>
>>Automate!!
>>
>>use ADir() to fill an array with all your form names.
>>set memowidth to 1000 so you don't have any wrap worries
>>Loop through the array USEing each scx
>>
>>
>>scan for class = 'youroptiongroup'
>> lcString = ""
>> lcTempString = ""
>> for lnCount = 1 to memlines(properties)
>> lcTempString = mline(properties, lnCount)
>> if 'ButtonCount =' $ lcTempString
>> lcTempString = StrTran(lcTempString, Substr(lcTempString, 15), "10")
>> Endif
>> lcString = lcString + lcTempString + Chr(13) + Chr(10)
>> EndFor
>> Replace properties with left(lcString, len(lcString) - 2)
>>EndScan
>>
>>
>>>Yes, what you suggest will work fine...
>>>
>>>But the main problem i'm having is if I have a form with a Optiongroup with 3 items in it and I change the baseclass to have 10 options
>>>I can't load the form it gives an error... Basically I'm too late to change my baseclass.
>>>
>>>I need to go through all my forms (via .SCX) and make the buttoncount 10 before I can load them.
>>>
>>>Thanks for the suggestion though :)
>>>
>>>>How about instead of adding and removing option buttons, simply make the unused ones invisible and resize the option group frame. I do that in a particular instance, and it seems to work just fine.
>>>>
>>>>Alan
Will Jones