Found myself

Return to index

Author

Message

zet

Posted: 09/29/2003 15:14:14

zet wrote:

> I want to add an item (table) right after the current paragraph.

> How could I move caret there?

>

   if richview1.curItemNo<>richview1.ItemCount-1 then p:=

richview1.curItemNo+1

                                                   else p:=

richview1.curItemNo;

   while not richview1.IsParaStart(p) do begin

    if p<richview1.ItemCount then inc(p) else exit;

   end;

And p now holds the number of the item which isParaStart.