Звук в TMediaPlayer - Мультимедиа в Delphi

Gapro · 25.10.2009, 15:46

Нужно воспроизвести звуковой файлик во время работы программы. Нашел в инете тока про TMediaPlayer, однако ни одной нормальной статейки про работу с ним не нашел. У кого-нибудь случайно нету статейки по работе с этим компонентом? Мне нужно все-го лишь воспроизвести звуковой файлик на 2-3 секунды...

Gapro · 25.10.2009, 17:07

А есть какие нибудь альтернативные способы воспроизвести нормальный звук, а то по TmediaPlayer я так и не нашел ничего нормального?

raxp · 25.10.2009, 17:12

да, есть... MCISendString(PChar('play ' + 'музыка.mp3 или wav или т.д'),nil,0,0)

russian-stalker · 25.10.2009, 17:13

Bass?

Цитата:

да, есть... msisendstring()

Может:
mciSendString?

Gapro · 26.10.2009, 13:47

Цитата:

Bass?

Неее, звуки спикера не подходят

Gapro · 26.10.2009, 13:51

Написал

Код:

procedure TForm1.FormCreate(Sender: TObject);
begin
 mciSendString(PChar('Play '+'C:\16_ICO_You_were_there_.mp3'),nil,0,0);
end;

end.

Ругается

Цитата:

[Error] Unit1.pas(27): Undeclared identifier: 'mciSendString'

Gapro · 26.10.2009, 13:54

Нашел ошибку, забыл добавить mmSystem в uses

raxp · 26.10.2009, 13:56

uses mmsystem;

Gapro · 19.11.2009, 23:01

Еще 1 вопрос, а почему несколько раз подрят таким способом нельзя запустить мелодию?

mihali4 · 20.11.2009, 01:24

Читаем правила.
Выполняем их.
Одна тема - один вопрос.
130 постов и никак не удается усвоить это простое правило???

25.10.2009, 15:46	#1
Gapro Форумчанин Регистрация: 30.07.2009 Сообщений: 256	Звук в TMediaPlayer Нужно воспроизвести звуковой файлик во время работы программы. Нашел в инете тока про TMediaPlayer, однако ни одной нормальной статейки про работу с ним не нашел. У кого-нибудь случайно нету статейки по работе с этим компонентом? Мне нужно все-го лишь воспроизвести звуковой файлик на 2-3 секунды...

25.10.2009, 17:12	#3
raxp Старожил Регистрация: 29.09.2009 Сообщений: 9,713	да, есть... MCISendString(PChar('play ' + 'музыка.mp3 или wav или т.д'),nil,0,0) Разработки и научно-технические публикации :: Видеоблог :: Твиттер Radar systems engineer & Software developer of industrial automation Последний раз редактировалось raxp; 25.10.2009 в 17:16.

26.10.2009, 13:56	#8
raxp Старожил Регистрация: 29.09.2009 Сообщений: 9,713	uses mmsystem; Разработки и научно-технические публикации :: Видеоблог :: Твиттер Radar systems engineer & Software developer of industrial automation Последний раз редактировалось raxp; 26.10.2009 в 13:57. Причина: дык, молодец

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Опять tmediaplayer	RealSHELS	Мультимедиа в Delphi	6	26.12.2008 04:35
Перемотка в TMediaPlayer	Kn793	Компоненты Delphi	0	10.07.2008 11:02
tMediaPlayer	Altera	Компоненты Delphi	2	21.06.2008 18:24
звук и делфи, левый правый звук	snusmumric	Win Api	2	29.10.2007 11:10
TMediaPlayer	Mickle	Мультимедиа в Delphi	1	13.04.2007 11:05

25.10.2009, 17:07	#2
Gapro Форумчанин Регистрация: 30.07.2009 Сообщений: 256	А есть какие нибудь альтернативные способы воспроизвести нормальный звук, а то по TmediaPlayer я так и не нашел ничего нормального?

26.10.2009, 13:54	#7
Gapro Форумчанин Регистрация: 30.07.2009 Сообщений: 256	Нашел ошибку, забыл добавить mmSystem в uses

19.11.2009, 23:01	#9
Gapro Форумчанин Регистрация: 30.07.2009 Сообщений: 256	Еще 1 вопрос, а почему несколько раз подрят таким способом нельзя запустить мелодию?

20.11.2009, 01:24	#10
mihali4 * Старожил Регистрация: 22.11.2006 Сообщений: 9,201	Читаем правила. Выполняем их. Одна тема - один вопрос. 130 постов и никак не удается усвоить это простое правило???