Hi,

Using the richtext control I need to limit the total length including all RTF commands taht can be entered in the control to 4000.

I tried setting the maxlength property to 4000 expect with all the rtf commands the actual size checked with len(this.textrtf) is much larger.

Does anyone have a function that will limit the amount of text that can be entered in the way i want?

I tried something like teh following in the selchange method but it just garbles the rtf...


IF LEN(this.textRTF)>3999
MESSAGEBOX("Max text Length Exceeded",0+16,"QuestPDM")
lcText=this.textRTF
this.text=""
this.SelRTF=SUBSTR(lcText,1,3999)
ENDIF

BR
Tim