<< Click to display table of contents >> TCustomRichViewEdit.OnCheckStickingItems

Allows to "stuck" items together.

type

  TRVStickingItemsEvent = procedure (Sender: TCustomRichViewEdit;

    RVData: TCustomRVData; FirstItemNo: Integer;

    var Sticking: Boolean) of object;

 

property OnCheckStickingItems: TRVStickingItemsEvent;

(introduced in version 14)

This event occurs before inserting something after the FirstItemNo-th item in RVData (if FirstItemNo=-1, this insertion is at the beginning of RVData).

Assign Sticking=True to prevent this insertion.

This event occurs after all default checking for sticking is done (see the Protection property of a text style).