Zawijanie wierszy po iluś znakach

Cześć, jak w RichEdicie wymusić zawijanie wierszy po iluś znakach?

Wystarczy ruszyć się i poszukać chociażby w grupach dyskusyjnych ;]

Hi, 

does anybody know how to wrap the text at a given position (SelStart)? 

I tried 

SelStart := {something}; 
SelText := #13+#10; 

It works (I have two lines now) but the problem is that Lines.Count is 
still 1 ! 

When I do SelStart := Length(Text) the cursor has to be in line 2 but 
when I do 

n := SENDMESSAGE(Handle, EM_LINEFROMCHAR, -1, 0); 

n is still 1. How can I do it in another way?

http://groups.google.com/groups?client=opera&rls=pl&q=richedit%20wrap%20text%20delphi&sourceid=opera&oe=UTF-8&ie=UTF-8&sa=N&tab=wg