Скачать: 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.017 c