Delphi

Вопрос

Имеется список строк TStrings, отсортированный в алфавитном порядке. Можно ли, не используя цикл, узнать Index первой строки, начинающейся с определенной буквы.

Ответ

S:='K';//то по какой ищем

listbox1.itemIndex := Perform(LB_SELECTSTRING, listbox1.itemIndex, LongInt(S));

Из конференции Expert_FAQ