Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Озвучка кнопок. (https://forum.antichat.xyz/showthread.php?t=17003)

Volk 03.04.2006 22:27

Озвучка кнопок.
 
Здравствуйте. подскажите как мне сделать так, чтоб при нажатии кнопки (SpeedBution1)проигрывался звук в формате wav (C:\S1.wav)??? И как куданибуть его поместить чтоб не таскать постоянно вместе с прогой???
---------------------------------------------
Заранее благодарен!!!
[Delphi 7, Win XP(SP2)]

Volk 03.04.2006 22:36

Цитата:

Playsound()
Такого вообше нет!!!!

Allen 03.04.2006 22:39

Volk
В справке есть инфа.
Цитата:

Сообщение от NeX
А ты сам озвучивай , типа нажал и КРИЧИ "ААААА Я НАЖАЛ!!! ОЙ ой ой Я нажал!! КАРАУЛ!! Она жметься!1 уй уй уй фу фу згинь!! ой ой во во во ой"

Прикольно.

Utochka 03.04.2006 22:41

Автор подключи модуль mmsystem или mmsound точно непомню.

Volk 03.04.2006 22:49

Ну да. Теперь появилась. Я пишу procedure TForm1.Button1Click(Sender: TObject);
begin
PlaySound('C:\s1.wav');
end;
а он мне отвечает: Not enough actual parameters. Как там надо? Подскажите пожалуйсто кодом. Я вообше это ни разу не делал.
--------------------------------------------------------------------------
Заранее благодарен!!!

Микрон Семенович 03.04.2006 23:22

WinAPI PlaySound()
см. http://msdn.microsoft.com

EvL 09.04.2006 17:02

Элементари:

uses
mmsystem;

// Проиграть
sndPlaySound('C:\s.WAV', SND_ASYNC);

// Проигрывать всё время
sndPlaySound('C:\s.WAV', SND_ASYNC + SND_LOOP);

//Остановить
sndPlaySound(nil, SND_ASYNC);

EST a1ien 09.04.2006 17:07

Цитата:

function PlaySound(pszSound: PChar; hmod: HINST;
fdwSound:Cardinal): Boolean; stdcall; external 'winmm.dll';
Цитата:

procedure TForm1.SpeedBution1Click(Sender: TObject);
begin
PlaySound('Min.wav',0,1);
end;
я так делал

Volk 09.04.2006 17:18

Понятно. А как мне этот wav файл куданибудь прикрепить, чтоб не таскать вместе с прогой? И как потом его проигрывать, если он будит прикреплён?
-------------------------------------------------------------
Заранее спасибо!!!

EST a1ien 09.04.2006 17:34

Да в роде бы некак.
Нужно всеегда ссобой таскать.
Хотя может кто и знает как звук запишнуть в .rc файлы


Время: 13:05