LOL

[William]

Throughout my like 3 years with ms, I NEVER knew about the search textbox on frmIndex xD

[Coke]

theres a search textbox?! o.0

[Robin]

No.

[William]

theres a search textbox?! o.0

Yes there is, it searches through the index list.

Guess Robin didn't know it either

[Matt]

theres a search textbox?! o.0

Yes there is, it searches through the index list.

Guess Robin didn't know it either

Where is it..?

[William]

At the top of frmIndex, try searching for a name you have in the list.

[Robin]

Major, there isn't one.

You've either added it, or you're using a different source.

[Matt]

Only thing on my frmIndex is the list box, the ok button, and the cancel button.

Are you on drugs? O_o

[William]

WTF, I have no memory of adding this xD WEIRD

Add a textbox called: txtSearch

Code:

Private Sub txtSearch_Change()
Dim i As Long
  If InItemsEditor = True Then

    For i = 1 To MAX_ITEMS
      If InStr(1, LCase(Item(i).Name), txtSearch.Text) > 0 Then
        lstIndex.ListIndex = i - 1
        Exit For
      End If
    Next i
  End If
  If InNpcEditor = True Then
    For i = 1 To MAX_NPCS
      If InStr(1, LCase(Npc(i).Name), LCase(txtSearch.Text)) > 0 Then
        lstIndex.ListIndex = i - 1
        Exit For
      End If
    Next i
  End If
  If InShopEditor = True Then
    For i = 1 To MAX_SHOPS
      If InStr(1, LCase(Shop(i).Name), LCase(txtSearch.Text)) > -1 Then
        lstIndex.ListIndex = i - 1
        Exit For
      End If
    Next i
  End If
  If InSpellEditor = True Then
    For i = 1 To MAX_SPELLS
      If InStr(1, LCase(Spell(i).Name), LCase(txtSearch.Text)) > 0 Then
        lstIndex.ListIndex = i - 1
        Exit For
      End If
    Next i
  End If
  If InArrowEditor = True Then
    For i = 1 To MAX_ARROWS
      If InStr(1, LCase(Arrows(i).Name), LCase(txtSearch.Text)) > 0 Then
        lstIndex.ListIndex = i - 1
        Exit For
      End If
    Next i
  End If
End Sub

Private Sub txtSearch_KeyPress(KeyAscii As Integer)
  If KeyAscii = 13 Then Call cmdOk_Click '13=enter key
End Sub

[Reece]

You must have been high.

[William]

I guess so xD