<< Click to display table of contents >> TSRVPageScroll.OnDrawPageBorder

Allows a custom drawing of borders of page thumbnails.

type

  TPSDrawPageBorderEvent = procedure (Sender: TObject; Canvas: TCanvas;

    const R: TRect; PageNo: Integer) of object;

 

property OnDrawPageBorder : TPSDrawPageBorderEvent ;

Canvas – canvas where to draw.

R – location of the page thumbnail.

PagNo – index of the thumbnails' page, from 1.

By default, all thumbnails have a border of PageBorderColor color. If this event is assigned, a default border is not drawn. But the selected page is still highlighted with SelectColor color, use OnDrawSelectedPage to override it.