Source position: rlpreviewform.pas line 101
procedure TRLPreviewForm.SpeedButtonPriorMouseUp(
Sender: TObject;
Button: TMouseButton;
Shift: TShiftState;
X: Integer;
Y: Integer
);