>Can someone tell me the syntax to add a RichTextBox control to a coded form class?
>
>I can get the RichTextBox on the form and show it, but I can't set the ScrollBar property or anything else that falls under the Object reference, because they are read-only.
>
>DEFINE CLASS myForm AS FORM
>ENDDEFINE
>DEFINE CLASS rtb AS OLECONTROL
>oleclass = "RICHTEXT.RichTextCtrl.1"
>width = 300
>height = 300
>scrollbars = 3 && this creates a new property. I need the one under .Object.Scrollbars?????????/
>ENDDEFINE
>
>Thanks!
Fred,
Not a direct reply :) You could design and save to a vcx.
oForm = createobject("myForm")
oForm.newobject("rtb","myRTBclass",cMyVCX)
oForm.rtb.TextRTF = "blah, blah,blah"
oForm.rtb.visible = .t.
Works.
Cetin