[Lazarus] Mousewheel events on TCustomControl

[Vojtěch Čihák]

@ You wrote component ECScheme ...
 
No, I wrote it :-)
______________________________________________________________
> Od: Vojtěch Čihák via Lazarus
> Komu: Lazarus mailing list <lazarus at lists.lazarus-ide.org>
> Datum: 03.10.2017 19:32
> Předmět: Re: [Lazarus] Mousewheel events on TCustomControl
>
Hi,
 
your scrollbars are part of control? I mean, are they created via
  ShowScrollBar(Handle, SB_HORZ, True);
  ShowScrollBar(Handle, SB_VERT, True);  ?
 
You wrote component ECScheme, it is part of ECControls and I didn't use DoMouseWheelxxx methods at all. I use
  procedure WMHScroll(var Msg: TWMScroll); message WM_HSCROLL;
  procedure WMVScroll(var Msg: TWMScroll); message WM_VSCROLL;  
instead to update area and it works well.
 
V.
______________________________________________________________
 > Od: Martok via Lazarus <lazarus at lists.lazarus-ide.org>
 > Komu: lazarus at lists.lazarus.freepascal.org
 > Datum: 03.10.2017 18:32
 > Předmět: [Lazarus] Mousewheel events on TCustomControl
 >

 
 
 -- 
 _______________________________________________
 Lazarus mailing list
 Lazarus at lists.lazarus-ide.org
 https://lists.lazarus-ide.org/listinfo/lazarus <https://lists.lazarus-ide.org/listinfo/lazarus>
 
 
 ----------
 
 -- 
 _______________________________________________
 Lazarus mailing list
 Lazarus at lists.lazarus-ide.org
 https://lists.lazarus-ide.org/listinfo/lazarus <https://lists.lazarus-ide.org/listinfo/lazarus>

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20171003/397d9aba/attachment.html>