Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Динамическая загрузка wav в WaveList: [Delphi, Windows]


greenrul ©   (2002-10-09 13:49:00) 

Динамически загружаю 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


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

Item : TWaveCollectionItem;

....

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


greenrul   (2002-10-09 13:58:00) [2]

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо