Инкрементальный поиск в Listbox по любым символам

Задай вопрос и получи ответ Да или нет


Gui Add, Edit, ge1 x1 y1 w180 h20 r1 vSearch
Gui Add, ListBox, x1 y21 w180 h400 vSite hwndSite, %sites%
..
; on edit change
e1:
Gui,Submit,NoHide
sitesArr := StrSplit(sites, "|")
newArr := []
newStr := ""
for k,v in sitesArr
{
if InStr(v, Search, false)>0
{
newArr.push(v)
}
}
for k,v in newArr
newStr .= "|" v
GuiControl, , Site, % newStr
GuiControl, Choose, site, 1
Return

Прекрасный вариант реализованный в ActionZipper_ahk