Re: Inserting Character

Author

Message

Sergey Tkachenko

Posted: 04/11/2003 22:06:24

First, consider using paragraph bullets (list markers), Any character (and

even character string) can be paragraph bullet, including '>'.

Demo: Demos\Delphi\Assorted\ListStyles\Bullets\

Or you can use Yernar's advice.

Get a range of items composing these paragraph, iterate them (better from

greater value downto lesser value), check if item starts the paragraph

(IfFromNewLine, or better IsParaStart). If yes, move caret before it (using

SetSelectionBounds(i, GetOffsBeforeItem(i), i, GetOffsBeforeItem(i)) and

insert '>' using InsertText.

> You can check if the item with ItemNo index starts a new line

(TCustomRichView.IsFromNewLine)

> and if so, insert character.