Показать сообщение отдельно
  #8  
Старый 06.10.2007, 17:54
Митяй2 Митяй2 вне форума
Прохожий
 
Регистрация: 06.10.2007
Сообщения: 7
Репутация: 10
По умолчанию

http://slil.ru/24943624 - исходник

функция:

procedure TFmMelody.LbMelodyClick(Sender: TObject);

место с:

if ((MultimediaType=midi) or (MultimediaType=mp3) or (MultimediaType=wav) or (MultimediaType=mp3full) or (MultimediaType=wavfull)) then
Ответить с цитированием