|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Выделение в ListBox
Ситуация такая .Есть два ListBox и в них несколько строк. Как сделать так, чтобы когда я выделял стоку в одном ListBox'e (например с индексом 0 ) , во втором аналогично выделялясь строка (с этим же индексом). Заранее спасибо.
|
#2
|
|||
|
|||
listbox2.itemindex:=0;
|
#3
|
||||
|
||||
Цитата:
Код:
ListBox2.ItemIndex:=ListBox1.ItemIndex |
#4
|
|||
|
|||
Спасибо за помощь
|
#5
|
|||
|
|||
Возник еще вопрос. Как высчитать общее количество строк в ListBox.
|
#6
|
|||
|
|||
listbox.items.count
|
#7
|
|||
|
|||
И еще. Делаю я плеер. Использую команду : FileName:=ListBox1.ItemIndex + 1 . Песня в плейлисте перескакивает на другую. А когда очередь доходит до последней , после ее завершения пишется ошибка : List index out of bounds (3). Можно как нибудь сделать так чтобы после завершения последней песни автоматически перебросилось на первую.
|
#8
|
||||
|
||||
Код:
if ListBox1.ItemIndex = ListBox1.Items.Count - 1 then ListBox1.ItemIndex:=0; Что делать, когда сломался комп: 1. Если вы юзер - делать ноги. 2. Если ремонтник - делать деньги. 3. Если вы программист - делать вид, что так было задумано. |
#9
|
|||
|
|||
Хорошо. Приду домой попробую.
|
#10
|
|||
|
|||
Вопросик по той же теме... У меня при перетаскивании, перемешивании (Drag&Drop) элементов ListBox'a пропадает выделение. Посоветуйте пожалуйста, как сделать так, чтобы выделение оставалось на том элементе, на котором отпустили мышку.
|
#11
|
|||
|
|||
А у меня такой вопрос:
Я тоже делаю плеер и плейлист у меня работает вот таким макаром Код:
procedure TForm1.ListBox1DblClick(Sender: TObject); begin MediaPlayer1.FileName := (String(ListBox1.Items[Listbox1.ItemIndex])); MediaPlayer1.Open; Mediaplayer1.Play; end; Код:
procedure TForm1.Button7Click(Sender: TObject); begin MediaPlayer1.FileName := (String(integer(ListBox1.Items[Listbox1.ItemIndex+1]))); MediaPlayer1.Open; Mediaplayer1.Play; end; Проще говоря нужно чтобы автоматически выделялся тот пункт в листбоксе который играет в данный момент !!! Всем заранее спасибо !!! CODDING - Штука тонкая !!! Последний раз редактировалось Roman_s, 08.10.2008 в 13:37. |
#12
|
|||
|
|||
Roman_s, оно в принципе так и должно работать, ведь ты используешь ItemIndex+1. То есть программа получает команду брать имя трека из выделенного айтема плюс 1.
Могу ошибаться, но попробуй принудительно ставить выделение на нужном треке: listBox1.Selected(index); Последний раз редактировалось w1zard, 08.10.2008 в 13:45. |
#13
|
|||
|
|||
Roman_s, оно в принципе так и должно работать, ведь ты используешь ItemIndex+1. То есть программа получает команду брать имя трека из выделенного айтема плюс 1.
Могу ошибаться, но попробуй принудительно ставить выделение на нужном треке: listBox1.Selected(index); |
#14
|
|||
|
|||
Мне нужно чтобы после нажатия Button7Click выделялась следующая песня
CODDING - Штука тонкая !!! |
#15
|
|||
|
|||
Тогда наверное надо еще делать так:
Код:
Listbox1.ItemIndex := Listbox1.ItemIndex+1; |