Discussion:
Message Scrollbox fixed
(too old to reply)
p***@charter.net
2013-03-17 00:11:36 UTC
Permalink
OK, I fixed the Message Scrollbox problem.
So that's working fine for me now.

If anyone is interested
Change the following code

procedure TfmMain.MessageScrollBox1MouseWheel(Sender: TObject;
Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint;
var Handled: Boolean);
begin
with MessageScrollBox1, VertScrollBar do
// Position := Position - (WheelDelta div 120) * Mouse.WheelScrollLines * LineHeight;
Position := Position - (wheelDelta div 100) * Mouse.WheelScrollLines * LineHeight;
Handled := True;
end;


120 should be 100
IF you don't use Delphi, e-mail me for a new version.
Q Correll
2013-03-17 02:03:59 UTC
Permalink
pkappetein,

| If anyone is interested
| Change the following code

Cool!

Thanks!

BTW,... why does my XN show "User-Agent: G2/1.0" for your reader
instead of a XanaNews version?
--
Q

03/16/2013 19:02:25

1.19.1.372 [Q'sBrokenToolBar] [Running on TQ]
Pieter Zijlstra
2013-03-17 02:23:50 UTC
Permalink
Post by Q Correll
BTW,... why does my XN show "User-Agent: G2/1.0" for your reader
instead of a XanaNews version?
He's using Google Groups to post here:
https://groups.google.com/forum/?fromgroups#!forum/alt.usenet.offline-reader.xananews
--
Pieter

"An empty stomach is not a good political advisor."
-- Albert Einstein
Q Correll
2013-03-17 16:42:40 UTC
Permalink
Pieter,

| He's using Google Groups to post here:
|
https://groups.google.com/forum/?fromgroups#!forum/alt.usenet.offline-reader.xananews

Ah,... yet he's working on XN? Shamey, shamey. ;-)
--
Q

03/17/2013 09:41:23

1.19.1.372 [Q'sBrokenToolBar] [Running on TQ]
Pieter Zijlstra
2013-03-17 02:16:36 UTC
Permalink
Post by p***@charter.net
OK, I fixed the Message Scrollbox problem.
What problem?
Post by p***@charter.net
So that's working fine for me now.
Great!
--
Pieter

"UNIX is simple. It just takes a genius to understand its
simplicity." -- Dennis Ritchie
p***@charter.net
2013-03-17 15:31:03 UTC
Permalink
I could not scroll the message up and down at all with my mouse wheel.
Had to use the scrollbars.

120 made the outcome always 0, and setting it to 100 not.
Post by Pieter Zijlstra
Post by p***@charter.net
OK, I fixed the Message Scrollbox problem.
What problem?
Post by p***@charter.net
So that's working fine for me now.
Great!
--
Pieter
"UNIX is simple. It just takes a genius to understand its
simplicity." -- Dennis Ritchie
Perry
2013-03-20 22:48:02 UTC
Permalink
LOL Talking to me?
Did not know that there was a NEWSGROUP for it... thought only a Google
group..

Found you in my usenet now.
Post by p***@charter.net
I could not scroll the message up and down at all with my mouse wheel.
Had to use the scrollbars.
120 made the outcome always 0, and setting it to 100 not.
Post by Pieter Zijlstra
Post by p***@charter.net
OK, I fixed the Message Scrollbox problem.
What problem?
Post by p***@charter.net
So that's working fine for me now.
Great!
--
Pieter
"UNIX is simple. It just takes a genius to understand its
simplicity." -- Dennis Ritchie
Q Correll
2013-03-21 18:57:05 UTC
Permalink
Perry,

| Found you in my usenet now.

Welcome!
--
Q

03/21/2013 11:56:34

1.19.1.372 [Q'sBrokenToolBar] [Running on TQ]
Perry
2013-03-21 22:29:01 UTC
Permalink
Post by Q Correll
Perry,
Post by Perry
Found you in my usenet now.
Welcome!
Thanks :)

Soo... What I fixed wasn't a bug then? since I see nobody else
complained about it.
Q Correll
2013-03-22 00:40:57 UTC
Permalink
Perry,

| Soo... What I fixed wasn't a bug then? since I see nobody else
| complained about it.

More likely that no one else uses the scroll-wheel. <g>
--
Q

03/21/2013 17:39:56

1.19.1.372 [Q'sBrokenToolBar] [Running on TQ]
Steve Foster
2013-03-22 18:06:15 UTC
Permalink
Post by Q Correll
Perry,
Post by Perry
Soo... What I fixed wasn't a bug then? since I see nobody else
complained about it.
More likely that no one else uses the scroll-wheel. <g>
Scrolling with my mouse-wheel works fine here (without Perry's
amendment).
--
Steve Foster
For SSL Certificates, Domains, etc, visit.:
https://netshop.virtual-isp.net
Q Correll
2013-03-22 20:58:30 UTC
Permalink
Steve,

| Scrolling with my mouse-wheel works fine here (without Perry's
| amendment).

My mouse-wheel has absolutely NO affect at all. <shrug>
--
Q

03/22/2013 13:57:26

1.19.1.372 [Q'sBrokenToolBar] [Running on TQ]
Steve Foster
2013-03-23 20:34:40 UTC
Permalink
Post by Q Correll
Steve,
Post by Steve Foster
Scrolling with my mouse-wheel works fine here (without Perry's
amendment).
My mouse-wheel has absolutely NO affect at all. <shrug>
There are occasions where the focus seems to be a little off, and then
turning the wheel will scroll the message list or group list instead,
but a click in the message pane sorts that out.
--
Steve Foster
For SSL Certificates, Domains, etc, visit.:
https://netshop.virtual-isp.net
Q Correll
2013-03-23 20:58:08 UTC
Permalink
Steve,

| There are occasions where the focus seems to be a little off, and then
| turning the wheel will scroll the message list or group list instead,
| but a click in the message pane sorts that out.

Not on my system. The mouse-wheel is totally non-functional anyplace
in my XN version.
--
Q

03/23/2013 13:56:54

1.19.1.372 [Q'sBrokenToolBar] [Running on TQ]
Perry
2013-03-24 17:31:17 UTC
Permalink
Post by Q Correll
Steve,
Post by Steve Foster
There are occasions where the focus seems to be a little off, and
then turning the wheel will scroll the message list or group list
instead, but a click in the message pane sorts that out.
Not on my system. The mouse-wheel is totally non-functional anyplace
in my XN version.
Even with the code change I mentiod ?
Cause I had the same problem. and my focus was right as well :)

In debug mode the value was always -1 since it was a divide with a 120
changing it to 100 gave me random numbers.
Q Correll
2013-03-25 20:14:09 UTC
Permalink
Perry,

| Even with the code change I mentiod ?

No, I did not try the code mod you mentioned.

I actually prefer the mouse-wheel to be totally inactive. <g>
--
Q

03/25/2013 13:12:49

1.19.1.372 [Q'sBrokenToolBar] [Running on TQ]
Dave
2013-03-25 16:13:44 UTC
Permalink
Post by Perry
Soo... What I fixed wasn't a bug then? since I see nobody else
complained about it.
Not true, it's been discussed and looked into before. I've just
recently changed my mouse and scroll is working but I'm certain it
wasn't with the last one and I'd resigned myself to that.

Last one was a Microsoft Wireless 5000
Both of the Logitech mice [??] I've just tried work on v 1.19.1.320 no
problem.
--
Dave
Dave
2013-03-25 16:17:31 UTC
Permalink
Post by Dave
Both of the Logitech mice [??] I've just tried work on v 1.19.1.320 no
problem.
Sorry ... they were an M-RCD125 and a Performance MX [*great* mouse].
--
Dave
Steve Foster
2013-03-25 18:16:27 UTC
Permalink
Post by Dave
Post by Perry
Soo... What I fixed wasn't a bug then? since I see nobody else
complained about it.
Not true, it's been discussed and looked into before. I've just
recently changed my mouse and scroll is working but I'm certain it
wasn't with the last one and I'd resigned myself to that.
Last one was a Microsoft Wireless 5000
Both of the Logitech mice [??] I've just tried work on v 1.19.1.320 no
problem.
Mine is a Microsoft Bluetooth something-or-other.

Note that I never install any of the crappy mouse software that comes
with them, just relying on core Windows drivers (and I'm RDPed to this
box).
--
Steve Foster
For SSL Certificates, Domains, etc, visit.:
https://netshop.virtual-isp.net
LocalHero
2013-03-25 16:12:04 UTC
Permalink
Post by p***@charter.net
OK, I fixed the Message Scrollbox problem.
So that's working fine for me now.
If anyone is interested
Change the following code
procedure TfmMain.MessageScrollBox1MouseWheel(Sender: TObject;
Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint;
var Handled: Boolean);
begin
with MessageScrollBox1, VertScrollBar do
// Position := Position - (WheelDelta div 120) *
Mouse.WheelScrollLines * LineHeight; Position := Position -
(wheelDelta div 100) * Mouse.WheelScrollLines * LineHeight;
Handled := True; end;
120 should be 100
IF you don't use Delphi, e-mail me for a new version.
I asked about this problem a long time back and never got it fixed.
Have emailed you.


--
Continue reading on narkive:
Loading...