tommyd

Comments

• Hi Nico,
  
  I found a solution. I have Windows 11 Pro.
  
  In the System Menu > Bluetooth & Devices > Mouse - I changed the following setting to on:
  Scroll inactive windows when hovering over them.
  <…

  in OnMouseWheel event for ThumbnailViewer Comment by tommyd April 17
• Hi Nico,
  
  I ran the program on another machine and the mouse wheel is working as expected. There must be some problem with the mouse events on my machine. I'll start troubleshooting my system from that angle.
  
  Thank you for your …

  in OnMouseWheel event for ThumbnailViewer Comment by tommyd April 12
• Greetings,
  
  I now have Delphi 12.1 and RB 22.04. I still can't get the mousewheel to respond in the ThumbnailViewer.
  
  Best Regards,
  Tommy

  in OnMouseWheel event for ThumbnailViewer Comment by tommyd April 9
• Hi Nard,
  
  Thank you for your reply. However, it isn't working for me. I have Delphi 12 Patch 1 and RB 22.03.
  
  There are more thumbnails than are displayed in the viewer but there is no response using the mousewheel. Could there b…

  in OnMouseWheel event for ThumbnailViewer Comment by tommyd April 5
• Hi Nico,
  
  I fixed the problem.
  
  I had one line of code in my components DrawCommandClass unit that was incorrect (synaptic breakdown in my brain). In its Assign procedure I was loading the component from its stream rather than s…

  in Custom component rendering on subreports Comment by tommyd December 2018
• Hi Nico,
  
  Thank you very much.
  
  Best Regards,
  Tommy

  in Custom component rendering on subreports Comment by tommyd December 2018
• Hi Nico,
  
  So much less work!
  
  Thank You,
  Tommy

  in ThumbnailViewer Comment by tommyd December 2018
• Greetings,
  
  Here is what I ended up with:
  
  procedure TMy_Form.PreviewFormCreate(Sender: TObject);
  var
  i, h: Integer;
  begin
  with TppPrintPreview(TppReport(Sender).PreviewForm).AccessoryToolbar do
  fo…

  in ThumbnailViewer Comment by tommyd December 2018
• Greetings,
  
  I discovered that the following works:
  
  //added to uses clause
  uses
  ppThumbnailViewer, ppOutlineNotebook;
  
  procedure MyForm.PreviewFormCreate(Sender: TObject);
  begin
  TppThumbnailVie…

  in ThumbnailViewer Comment by tommyd December 2018
• Hi Nico,
  
  Thank you. Works like a champ.
  
  Best Regards,
  
  Tommy

  in Outline Width Comment by tommyd September 2018