|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
31.05.2008, 08:15 | #1 |
Старожил
Регистрация: 29.01.2008
Сообщений: 2,406
|
Проиграть wav
Привет всем!
Как мне проигрывать wav так, чтоб можно было контролировать воспроизведение. Собственно нужно только PLAY и STOP. Я знаю, что код будит не маленький, поэтому киньте его как pas файл во вложение. Или дайте ссылку туда, где это хорошо обясняеться. з.ы. Прошу простить, если такая тема уже была. |
31.05.2008, 08:32 | #2 | |
Форумчанин
Регистрация: 05.08.2007
Сообщений: 225
|
Цитата:
Play: Код:
Код:
Последний раз редактировалось Kashp; 31.05.2008 в 08:35. |
|
31.05.2008, 09:45 | #3 |
Старожил
Регистрация: 29.01.2008
Сообщений: 2,406
|
А как узнать, что воспроизведение окончено?
|
31.05.2008, 10:22 | #4 |
Форумчанин
Регистрация: 05.08.2007
Сообщений: 225
|
По таймеру:
Код:
Последний раз редактировалось Kashp; 31.05.2008 в 10:34. |
31.05.2008, 10:34 | #5 |
Участник клуба
Регистрация: 08.03.2008
Сообщений: 1,537
|
TMediaPlayer.OnNotify вызывается при любых событиях медиаплеера (пауза, остановка и т.д).
procedure TForm1.MediaPlayer1Notify(Sender: TObject); begin with Sender as TMediaPlayer do if NotifyValue = nvSuccessful then ShowMessage('Воспроизведение окончено!'); end; |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Проиграть звук | Манжосов Денис :) | Общие вопросы Delphi | 4 | 19.08.2008 00:06 |