Function FindItemListBox(ByVal gadget As Long, ByRef text As String, ByVal Startpos As Long = -1) As Integer
Производит поиск строки в ListBoxGadget. Найденный пункт со строкой становится выбранным в ListBoxGadget. Возвращает индекс найденного\выбранного пункта со строкой (отсчет с нуля).
gadget - номер гаджета
text - искомая строка
Startpos - стартовая позиция для поиска. По умолчанию стоит поиск сначала
Windows , Linux
#Include "window9.bi"
OpenWindow("",10,10,400,150)
ListBoxGadget(1,10,10,100,80)
AddListBoxItem(1,"Привет0",-1)
AddListBoxItem(1,"Привет1",-1)
AddListBoxItem(1,"Привет2----",-1)
ButtonGadget(2,150,10,220,20,"Искать строку Привет1")
Do
var event=WaitEvent()
If event=eventclose Then End
If event=eventgadget Then
If eventnumber()=2 Then
Print FindItemListBox(1,"Привет1")
EndIf
EndIf
Loop
Created with the Personal Edition of HelpNDoc: Create HTML Help, DOC, PDF and print manuals from 1 single source