TSRVPageScroll.OnDrawSelectedPage

Allows a custom drawing of highlighting of the selected thumbnail.

type

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

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

property OnDrawSelectedPage: TPSDrawSelectedPageEvent;

Canvas – canvas where to draw.

R – location of the page thumbnail.

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

This drawing occurs after drawing the default page border, see OnDrawPageBorder.

By default, highlighted page have a border of SelectColor color. If this event is assigned, this default border is not drawn