TMSFNCWXPDFViewer: Zoom-In and Zoom-Out via ctrl + Mouse wheel

FNC TMS FNC WX Pack
1

In TMSFNCWXPDFViewer, when a PDF document is zoomed in with the mouse (ctrl + mouse wheel), the document becomes pixelated because the drawing area is zoomed, but not the document.

What is the easiest way to catch this and assign "TMSFNCWXPDFViewer1.ZoomIn" or "TMSFNCWXPDFViewer1.ZoomOut" instead?

I didn't make it with the MouseWheelDown/up event.
Could it be that this event is not yet evaluated?

procedure TForm1.TMSFNCWXPDFViewer1MouseWheelDown(Sender: TObject;
Shift: TShiftState; MousePos: TPoint; var Handled: Boolean);
begin
if ssCtrl in Shift then TMSFNCWXPDFViewer1.ZoomIn;
end;

pdf
pdf770×538 114 KB

2

Hi,

We applied an improvement for this. The next update will contain the changes,

3

This sounds good :slight_smile:
Thank you very much

4

Now it works as expected.
Thanks a lot :slight_smile:

5

This topic was automatically closed 60 minutes after the last reply. New replies are no longer allowed.