No subject
Thu Oct 26 19:20:09 CEST 2017
PUBLIC SUB mnuGoto_Click()
DIM iLine as Integer
iLent = $cLine[LAST.Tag] +1
edtEditor.Column = 0
edtEditor.Line = iLine - 10
edtEditor.Line = iLine + 10
edtEditor.Line = iLine
END
Does not work when the visible lines are less then 10 and
the code is more for example 100 lines.
The trick here is to get the line centered in the visible
area. The value of 10 should be half of the visible lines.
If both values where known it was possible to make a idiot
proof center routine. I found it handy in handling the text
position in the text area.
------
Ron
More information about the User
mailing list