Вниз
Скачать: CL | DM;

*.wav   Найти похожие ветки 

 
sagchat ©   (2003-05-14 12:26) [0]

У меня есть 3 файла *.wav
Как мне по нажатию на кнопку проигрывать каждый раз другой


 
NickBat ©   (2003-05-14 12:31) [1]

Path[1]="mywav1.vaw";
Path[2]="mywav2.vaw";
Path[3]="mywav3.vaw";

Ввести счетчик нажатий на кнопку.
if count=4 then count:=1;


 
Ru ©   (2003-05-14 12:32) [2]

хранить номер/имя последнего проигранного и в следующий раз проигрывать следующий номер. Сохранить в ини или текстовый файл. Соответственно имя вавов должны содержать нумерацию.


 
Palladin ©   (2003-05-14 12:32) [3]

образование высшее


 
sagchat ©   (2003-05-14 12:48) [4]

NickBat
Что то не получается, можешь по подробнее?


 
NickBat ©   (2003-05-14 12:54) [5]

> образование высшее

Может не техническое? :))
Поподробнее? Куда уж подробнее. :)) Хотя...

var
count: integer;

procedure formCreate ()
...
count:=1;
...

procedure button1click();
begin
Играем файл Path[count];
count:=count+1;
if count=4 then count:=1;
end;

Дельфи сейчас под руками нет, как называется функция проигрывания звуковых файлов не помню.

F1 - тебе поможет.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c
1-83544
EvgeniyR
2003-05-13 09:15
2003.05.26
ShellExecute(0, nil, PChar(m),nil,nil,1)


3-83371
bss
2003-05-06 10:16
2003.05.26
Добавление заголовков на кнопки DBNavigatora


1-83468
Grac
2003-05-15 10:47
2003.05.26
Перевод в Integer


1-83572
snake1977
2003-05-14 08:53
2003.05.26
Окончание записи в файл


6-83639
ИЭ-01
2003-02-07 12:03
2003.05.26
Как передать звук по сети в реальном времени?




   Наверх