Top  Previous  Next

Allows custom painting for controls inserted in the editor.


  TSRVComponentEvent = procedure(Sender: TSRichViewEdit;

     PaintMe: TControl; Canvas: TCanvas; ComponentRect: TRect;

     var isPaint: Boolean) of object;


property OnPaintComponent: TSRVComponentEvent;

All controls are inserted in RichViewEdit . TSRichViewEdit component creates images of controls and uses them when it needs to display them.

Not all controls can be drawn by the default procedure. This event allows you to draw controls yourself.

PaintMe – control to paint.

Canvas – canvas where to paint.

ComponentRect – coordinates where to paint.

isPaint - set to True if you drew this control (otherwise it will be drawn by the default procedure).

ScaleRichView © trichview.com