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