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

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

Нужен компонент как TMediaPlayer.


VEG ©   (2001-12-27 19:37:00) 

Пишу для события OnNotifly:
procedure TFormMain.MPlMusicNotify(Sender: TObject);
begin
If MPlMusic.Position=MPlMusic.Length Then
begin
Case TupeGame of
1:MPlMusic.FileName:="Music\Fon1.wav";
2:MPlMusic.FileName:="Music\Fon2.wav";
3:MPlMusic.FileName:="Music\Fon2.wav";
MPlMusic.Open;
MPlMusic.Play;
end;
end;
Музыка играет, обрывается и начинается сначала как-бы с пробелом, хотя мне нужно без пробела. Чего посоветуете??? Может какой-нить компонент есть такого плана???


Wizard_Ex   (2001-12-29 18:59:00) [1]

Есть предложение п поводу.
в Фак чего есть
посмотри...
Не найдешь, - пиши, но там точно есть


Григорий Ситнин   (2001-12-28 14:22:00) [2]

Если не найдешь компонента - попробуй создать несколько медиалпееров и по OnNotify говорить нужному из них .Play... Разумеется, .Open надо вызывать до, так как именно он и тормозит по большей части. А вообще - попробуй использовать API, куда лучше для твоих целей...


Наверх

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