OpenEuphoria

Re: [Ann:] MEditor 2.0.3 release

• Posted by Pete Lomax <petelomax at blueyonder.co.uk> May 29, 2003
• 426 views

On Thu, 29 May 2003 10:00:04 -0500, "C. K. Lester"
<cklester at yahoo.com> wrote:

>
>
>Pete,
>
>> PS Can someone with a mouse wheel check whether it now works?
>
>It works,
Thanks
> but can I make a suggestion?
Sure
>
>Scrolling my mouse scrolls three lines (probably the default standard
>scrolling). Instead of having it smoothly scroll all three lines, can =
you
>make it jump to that final position? Either that, or make the scroll =
move
>many times faster than it does now. I wouldn't want to scroll through a =
long
>document the way it works now.

In editor.exw, routine eventhandler (near the end), can you replace
the two "while delta" loops with:
--		while delta>0 do
		if delta>0 and getTopLine()> 1 then
			if delta>=3DgetTopLine() then delta=3DgetTopLine()-1 end if
			for i =3D 1 to delta do moveCursorUp() end for
			if Controled then
				void=3DscrollScreen(getTopLine()-delta,getLeftColumn())

setDisplayRange(getTopLine(),getTopLine()+getScreenRows())
			end if
		end if
--		.. end while
--		while delta<0 do
		if delta<0 and getTopLine()<getNumberOfLinesInFile() then
			if getTopLine()-delta>getNumberOfLinesInFile() then
				delta=3DgetTopLine()-getNumberOfLinesInFile()
			end if
			for i=3Ddelta to -1 do moveCursorDown() end for
			if Controled then
				void=3DscrollScreen(getTopLine()-delta,getLeftColumn())

setDisplayRange(getTopLine(),getTopLine()+getScreenRows())
			end if
		end if
--		.. end while

The calculation of delta might be wrong if it is always returning 3,
but thats what the M$ docs said to do.

Regards,
Pete