Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Mp3

KEBZ © (2004-04-20 14:48:00)
Как мне проиграть MP3 файл без Media player при нажатие на кнопку на клаве "a";
Cпасиба
end.

Mihey (2004-04-21 00:33:00) [1]
Бачь код
http://www.planet-source-code.com/vb/scripts/ShowZip.asp?lngWId=7&lngCodeId=346&strZipAccessCode=tp%2FM3465953

Играет файло без TMediaPlayer'а через mciSendString.

Mihey (2004-04-21 00:22:00) [2]
2 Yanis:

KEBZ // > Как мне проиграть MP3файл без Media player при нажатие на кнопку на клаве "a";

Yanis // > Только в uses допиши MMSystem
If ((key = 'a') or (key = 'A')) then PlaySound('c:\182. WAV',0,SND_FILENAME);

Sheng (2004-04-20 23:46:00) [3]
А чего? Можно. Winamp SDK API знаешь?

Запускаешь Winamp, делаешь
hWinamp:=FindWindow('Winamp v1.x',nil);

потом

if Key='a' then SendMessage(hWinamp,WM_COMMAND,40045,0);

и всё играется.

ASvencim (2004-04-20 23:37:00) [4]
>Gero
>Давайте я попробую.
>Если получится - с Вас пиво.

Тебе бандеролью или с курьером?

Gero (2004-04-20 23:27:00) [5]

> А, может без Delphi попробуешь?

Давайте я попробую.
Если получится - с Вас пиво.

Yanis (2004-04-20 23:05:00) [6]
Разберёшься?
Только в usesдопиши MMSystem
If ((key = 'a') or (key = 'A')) then PlaySound('c:\182.WAV',0,SND_FILENAME);

ASvencim (2004-04-20 22:55:00) [7]
Без медиа плейера? А, может без Delphi попробуешь?

Наверх

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