Skip to main content

Подскажите про звук в Delphi

Аватар пользователя Wae Wictis
Не в сети
Новенький
Зарегистрирован: 21.06.2007
Сообщения: 19
Баллы: 39
Подскажите про звук в Delphi

Как удобнее всего воспроизваодить звук в Delphi?
я знаю только MediaPlayer, и то выдаёт какую-то ошибку. Посоветуйте кто что знает.

Аватар пользователя APOLLO
Не в сети
Гражданин
Зарегистрирован: 24.07.2006
Сообщения: 1180
Баллы: 1259
Re: Подскажите про звук в Delphi

Если хочеш сделать что то типо Медиа плеера, то лучше всего юзать компонент MediaPlayer, странно тока, что он у тя выдаёт ошибку...
Есть также другие функции, наприм нужно, чтобы после нажатия кнопки воспроизводило звук:

sndPlaySound('test.wav', SND_ASYNC or SND_FILENAME);

тута тока имеет значение формат файла, а именно воспроизводит тока *.wav

Аватар пользователя Wae Wictis
Не в сети
Новенький
Зарегистрирован: 21.06.2007
Сообщения: 19
Баллы: 39
Re: Подскажите про звук в Delphi

не мог бы ты мне написать кусочек кода, а то в моём представлении это так:
Mediaplayer.filename:=openDialog.filename;
mediaplayer.play;
Smile
вообщето мне звук надо просто так, без управления(не нужны стоп, пауза, перемотка), типа в игру.

Аватар пользователя APOLLO
Не в сети
Гражданин
Зарегистрирован: 24.07.2006
Сообщения: 1180
Баллы: 1259
Re: Подскажите про звук в Delphi

Ну если ты хочеш использовать диалоговое окно для выбора песни и запуска её,то:

procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then begin
MediaPlayer1.FileName:=OpenDialog1.Filename;
MediaPlayer1.Open;
MediaPlayer1.Play;
end;
end;

Если нада, чтобы Не видна была панелька медиаплеера, поставь у неё свойство Visible равное false

Аватар пользователя Wae Wictis
Не в сети
Новенький
Зарегистрирован: 21.06.2007
Сообщения: 19
Баллы: 39
Re: Подскажите про звук в Delphi

Спасибо!
MediaPlayer1.Open; - про эту строчку я наверно забыл.
Блин, запихнул в ImageList 18 картинок размером 10 МБ теперь он у меня уже 5 минут сохраняется... мне становится страшно за свои кривые руки. Так и должно быть?

Аватар пользователя APOLLO
Не в сети
Гражданин
Зарегистрирован: 24.07.2006
Сообщения: 1180
Баллы: 1259
Re: Подскажите про звук в Delphi

впринципе всё должно быстро сохраниться...

Аватар пользователя Wae Wictis
Не в сети
Новенький
Зарегистрирован: 21.06.2007
Сообщения: 19
Баллы: 39
Re: Подскажите про звук в Delphi

Теперь работает, ещё вопросик. Как можно поместить видео файл прямо в программу?

Блин, я запихиваю в ImageList картинку 100х100, всё работает нормально. Запихиваю туда картинку 400х300, делфи зависает! как ещё можно хранить большое количество картинок в делфи? Или мне их придётся разбивать на несколько мелких и запихивать в ImageList.

Аватар пользователя m1cr0sh
Не в сети
Студент
Зарегистрирован: 01.12.2006
Сообщения: 842
Баллы: 925
Re: Подскажите про звук в Delphi

слышал такое слово как "ресурс"?

создаешь *.RC файл следующего содержания:
SCENE1 BITMAP SCENE1.BMP
SCENE2 BITMAP SCENE2.BMP
...

потом нада из него сделать *.res
затем добавить его в проект ({$R BITMAPS.RES})
если не разберешься пиши в личку, постараюсь обяснить подробней

Аватар пользователя Wae Wictis
Не в сети
Новенький
Зарегистрирован: 21.06.2007
Сообщения: 19
Баллы: 39
Re: Подскажите про звук в Delphi

Теперь у меня такой вопрос.
Я хочу, что бы нажав на кнопку (Button1), текст из поля ввода (Edit1) попал в выпадающий список (ComboBox1).

Отбой тревоги, я вспомнил. Smile

Настройки просмотра комментариев

Выберите нужный метод показа комментариев и нажмите "Сохранить установки".