Помощь с TListBox

[Манжосов Денис :)]

Сделать хочу следующее:
У меня есть компонент TListBox, в нём два пункта
Дерево
Камень(к примеру)
Выделение стоит на камне.
Я хочу программно сделать так, чтобы выделение с камня перешло на дерево. Как?

[Air]

ListBox1.ItemIndex:=1;
Цифру поставь соответственно (всё начинается с 0)

[Манжосов Денис :)]

Про ItemIndex я знаю, но вот чтобы без ItemIndex а просто вперёд на одну позицию?

[Air]

Сообщение от Манжосов Денис :)

Про ItemIndex я знаю, но вот чтобы без ItemIndex а просто вперёд на одну позицию?

Не пойму в чём проблема?
Хотя можно вот так.
ListBox1.Items.IndexOf('дерево');
опять же потребуется ItemIndex

[Манжосов Денис :)]

Не указывать позицию (ComboBox1.ItemIndex:=1, а просто перейти на одну позицию выше(например стоит 1, а надо поставить 2, но не указывая двойку).

[[Smarik]]

itemindex - параметр лист бокса отвечающий за его содержимое, без него нельзя, даже если и можно было бы, то зачем?

[[Smarik]]

Сообщение от Манжосов Денис :)

Не указывать позицию (ComboBox1.ItemIndex:=1, а просто перейти на одну позицию выше(например стоит 1, а надо поставить 2, но не указывая двойку).

a:=1+1;
listbox1.itemindex:=a; =)

[Air]

Сообщение от Манжосов Денис :)

Не указывать позицию (ComboBox1.ItemIndex:=1, а просто перейти на одну позицию выше(например стоит 1, а надо поставить 2, но не указывая двойку).

"Тьфу ты", ни чё не пойму, почему Вы не хотите использовать ItemIndex?

[Манжосов Денис :)]

Понимаете... У меня есть проигрыватель музыкальных файлов. Я использую TListBox, как плейлист в программе. У меня есть таймер, который проверяет остановилась ли песня, если ДА то переход на следующую песню, которая стоит в плейлисте. Как переключить песню?

[Air]

listbox1.itemindex:=listbox1.itemin dex+1;
А в плейере указать на listbox1.text (ну или как Вы воспроизводите...), а потом Play.