TextArea

Hi
how i can make the TextArea to Auto do Enter or next line after Len of 30

put this code in textchange event handler

if (TextArea1.Text.Len \ 30) = (TextArea1.Text.Len / 30) then
TextArea1.Text=TextArea1.Text + chr(13)
TextArea1.SelStart=TextArea1.Text.Len
end if

adapt the test because you add a chr(13) each 30 char

Thanks

Yes, EndOfLine instead of Chr(13) may be what you need.

Ok
Thanks

I trait but no work correct.
I need like a word processor when type it fix the doc up to 30 Chr.

if i press backspace then get bad in the doc.