<< Нажмите, чтобы показать Содержание >> TCustomRichView.OnPaint

Позволяет рисовать поверх документа TRichView.

type

  TRVPaintEvent = procedure (Sender: TCustomRichView; 

    Canvas: TCanvas; Prepaint: Boolean) of object;

 

property OnPaint: TRVPaintEvent;

Параметры:

Canvas – канва для рисования.

Prepaint – зарезервировано для будущего использования. Это событие вызывается после завершения стандартного рисования.

 

Событие не влияет на печать (см. OnPagePrepaint, OnPagePostpaint).

 

VCL/LCL: используйте клиентские координаты для рисования. Point(0,0) находится в левом верхнем углу клиентской области окна TRichView.

FireMonkey: используйте координаты в документе для рисования. PointF(HScrollPos, VScrollPos) находится в левом верхнем углу клиентской области окна TRichView.

 

Демонстрационный проект:

▪Demos\*\Assorted\Custom Draw\CustomDraw\