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