[RESOLVED] [2005] Challenge: Faster Cursor Position

[wossname]

Split is the slowest thing since a stalled Morris minor. You are completely killing your ram usage with that.

There's no use using split to count the lines when all you have to do is loop through and count the number of vbLF's. This won't use any extra ram and will be infinitely faster.

You can get the total lines and the current cursor line in a single loop, the column position will be the difference between the absolute cursor position and the position of the vbLF just to the left of the cursor.

Easy peasy.

I'll let you have a go at coding that yourself first.

[arsmakman]

I didn't know Split was slow, thanks Wossname. I now have this. It's faster, 90ms, but still a bit too slow.

Dim sText As String = Mid(EditorRichTextBox.Text, 1, _
    EditorRichTextBox.SelectionStart)
Dim iLine As Integer = 0
Dim iIndex As Integer = 0
Do
    iLine += 1
    iIndex = InStr(iIndex + 1, sText, vbLf)
Loop While iIndex > 0
 
Dim iColumn As Integer = sText.Length - sText.LastIndexOf(vbLf)
Dim iTotalLines = EditorRichTextBox.Lines.Length
 
CursorPositionToolStripStatusLabel.Text = "Line " & iLine & "/" & _
    iTotalLines & ", Column " & iColumn