Sheesh!!!!!!!!! It had to be something silly and simple! Thank you SO MUCH for taking a look at this. It's working now.
Tracy
>>Definite. I expected it to work, but it does nothing. Can you try my code on your machine? Here is my code (I saved the form as a class to get it):
>>
>>
>> PROCEDURE text1.Click
>> THIS.value="This is an example of the font "+thisform.combo1.value
>> This.fontname= alltrim(thisform.combo1.value)
>> thisform.refresh()
>> DODEFAULT()
>> ENDPROC
>>
.·*´¨)
.·`TCH
(..·*
010000110101001101101000011000010111001001110000010011110111001001000010011101010111001101110100
"When the debate is lost, slander becomes the tool of the loser." - Socrates
Vita contingit, Vive cum eo. (Life Happens, Live With it.)
"Life is not measured by the number of breaths we take, but by the moments that take our breath away." -- author unknown
"De omnibus dubitandum"