Показать сообщение отдельно
  #15  
Старый 26.08.2012, 18:14
Dmitry_DM Dmitry_DM вне форума
Активный
 
Регистрация: 07.08.2012
Сообщения: 258
Версия Delphi: Delphi 7
Репутация: 11
По умолчанию

Цитата:
Сообщение от poli-smen
Ну так а как ты устанавливаешь громкость? А вот так:
Код:
  SetMPVolume(MediaPlayer1, 1000 - TrackBar1.Position * 50);
А теперь внимание вопрос: За что отвечает TrackBar1? Может всё-же стоит переименовать TrackBar1 и TrackBar2 в более человеческие имена, чтобы самому-же и не путаться?
Задал всем имена, поправил эту ошибку и все-равно проблема осталась.
Цитата:
Сообщение от poli-smen
Да мне-то тоже этот обработчик не мешает - он же не в моей программе.
Ну а все же что вы посоветуете сделать, что бы сократить? Меньше объем - лучше.
Цитата:
Сообщение от poli-smen
То есть раз работает, значит работает правильно? И зачем только эту бесполезнейшую FindClose придумали?..
Вот когда происходят катастрофы и у ответственных лиц спрашивают "Почему у вас был заварен предохранительный клапан?", на что они отвечают: "Установка работала и без этого. Мне кажется, смысла в предохранительном клапане нету. Или я ошибался?"

И ещё. Зачем там 2 раза подряд используется FindNext?
Та добавил я уже FindClose и убрал лишний FindNext.

Цитата:
Сообщение от poli-smen
И что от этого сильно изменилось? Вот открываю я одновременно 2 файла, после этого открываю другие файлы, но они в список не добавляются, а остаются те первые 2, да ещё и начинают играть, хотя Autoplay у меня отключен.
Да, я заметил эту ошибку. Это происходит, если открывать по несколько файлов. И что можно предпринять? По-моему это главная ошибка.

Цитата:
Сообщение от poli-smen
Что так и будет? Будет воспроизводиться файл который последним воспроизводился (который не обязательно первый). А вопрос был: Почему ты уверен, что будет воспроизводиться первый файл из списка?
Действительно. Только заметил..

Цитата:
Сообщение от poli-smen
То куда пойдёт значение Len я вижу. Я хотел, чтобы ты мне объяснил загадочную связь между свойством "Mediaplayer1.TrackLength" и свойством "ListBox1.ItemIndex".
Я так и не понял что здесь не так?
На всякий случай исходный весь код я передаю вам в ЛС. А exe с некоторыми исправленными ошибками внизу.
Вложения
Тип файла: rar Project2.rar (559.5 Кбайт, 16 просмотров)
Ответить с цитированием