Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.06;
Скачать: CL | DM;

Вниз

Динамическая загрузка wav в WaveList:   Найти похожие ветки 

 
greenrul ©   (2002-10-09 13:49) [0]

Динамически загружаю wav файлы :
procedure LoadSound (Filename, NameString : String);
begin
MainForm.DXWaveList1.Items.Add;
with MainForm.DXWaveList1.Items
[MainForm.DXWaveList1.Items.Count-1] do
begin
Wave.LoadFromFile(Filename);
Name:=NameString;
Looped:=false;
end;
end;
.......
LoadSound("бла-бла-бла\boom.wav","boom");
.......
MainForm.DXWaveList1.Items.Find("boom").Play(true);

Звука просто нет.



Может дело вот в чем:
Пытаюсь докопаться до свойств DxInput -где можно клавиши указывать - не получается. Дважды кликаю - и никакого диалогового окна. То же самое с DxWaveList - Двойной клик ничего не дает, а "+Wave" в ObjectInspector вообще пустой, так что только динамически можно wav загружать....

Как это исправить? Поставил себе UnDelphiX, но ничего не изменилось...

icq:2463277


 
greenrul ©   (2002-10-09 13:58) [1]

оказалось нужно добавить в цикл restore...


 
Владимир Васильев ©   (2002-10-09 14:01) [2]

Item : TWaveCollectionItem;

....

Item := TWaveCollectionItem.Create(DXWaveList1.Items);
Item.Name := SoundName;
Item.Wave.LoadFromFile("бла-бла-бла\boom.wav");
.......
Item.Restore;//!!! обязательно!!!



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

Текущий архив: 2003.03.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.027 c
3-16853
Alex_xelA
2003-02-14 11:07
2003.03.06
ADO


1-17115
AZ
2003-02-22 08:56
2003.03.06
Необходимость создания кистей и перьев


1-17047
Zergling
2003-02-25 06:19
2003.03.06
На RTTI-ку навались (пробуем создать инспектор объектов)


9-16847
Naik
2002-09-15 08:46
2003.03.06
Как развернуть прогу в полноэкранный режим?


1-17066
Nemo
2003-02-25 02:51
2003.03.06
А можно сделать чтобы приложение нельзя было уничтожить?