Source position: JPP.DoubleLineLabel.pas line 34
type TJppDoubleLabelLineEvent = procedure(
Sender: TObject;
Canvas: TCanvas;
X1: Integer;
X2: Integer;
Y: Integer
) of object;