| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

PlayList с помощью ListBox'а [D6, Win2k]

Maxim_82 ©   (2006-06-22 10:38:00) 

Подскажите как при двойном нажатии по ListBox'у шрифт строки изменился на другой. (как в плэйлисте)

---

antonn   (2006-06-23 05:57:00) [1]

Maxim_82   (23.06.06 4:51) [2]
потому что итем, на который щелкнули, и итем, с которого осуществляется проигрывание - разные вещи...
как они связаны?

---

Maxim_82   (2006-06-23 04:51:00) [2]

да это работает но вот при воспроизведении следующего файла, предыдущий не меняет цвет на исходный ....

---

antonn   (2006-06-22 15:46:00) [3]

можно отрисовывать в OnDrawItem:
procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
 Rect: TRect; State: TOwnerDrawState);
begin
ListBox1.Canvas.FillRect(rect);
if ListBox1.ItemIndex=index then
 ListBox1.Canvas.Font.Color:=clred else
  ListBox1.Canvas.Font.Color:=clblack;
ListBox1.Canvas.TextOut(rect.Left,rect.Top,ListBox1.Items.Strings[index]);
end;

---

Наверх