Форум программистов, компьютерный форум, киберфорум
Delphi: FireMonkey
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/18: Рейтинг темы: голосов - 18, средняя оценка - 4.83
843 / 738 / 342
Регистрация: 22.09.2012
Сообщений: 5,034
1

Проиграть мелодию андроид + ХЕ8

25.09.2015, 12:29. Показов 3522. Ответов 4
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Необходимо воспроизвести мелодию на андроиде.
Кинул на форму компонент MediaPlayer и написал вот такой код на кнопку:

Delphi
1
2
  MediaPlayer1.FileName:= '/storage/emulated/0/Download/melod.mp3';
  MediaPlayer1.Play;
Воспроизводит нормально вроде, но я файл melod.mp3 положил вручную на андроид по пути /storage/emulated/0/Download/

Вот и вопрос - как сделать это автоматически?
Или у кого есть другие какие варианты воспроизведения звука?
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.09.2015, 12:29
Ответы с готовыми решениями:

Как сделать две формы Андроид (ХЕ8)
Как сделать 2 или 3 активити ни как непойму, необходимо что-то чтоб одна станица (форма) чтоб...

Всплывающее окно ХЕ8 + андроид для сохранения файла
Как вызвать любое всплывающее окно где можно будет ввести имя файла для его сохранения?

Как проиграть мелодию?
Мне хотелось бы узнать как создаётся музыка на qbasic. Помогите пожалуйста.

Проиграть мелодию, встроенную в программу
вообщем, я решил написать небольшую игру тетрис, консольный режим, и сразу возник вопрос можно ли...

4
843 / 738 / 342
Регистрация: 22.09.2012
Сообщений: 5,034
26.09.2015, 22:04  [ТС] 2
Может как мелодию можно в ресурс засунуть (ну типа как картинку).
Или что еще можно сделать?
0
13 / 13 / 14
Регистрация: 11.11.2012
Сообщений: 147
27.09.2015, 16:17 3
Лучший ответ Сообщение было отмечено NIKOLAYY как решение

Решение

Project -> Deployment
Загружаете туда файл, меняете Remote Path, например на /Documents/
Чтобы получить доступ к этим файлам из приложения подключите модуль System.IOUtils
Далее в коде пропишите пусть к файлу
Delphi
1
filename = TPath.GetDocumentsPath + PathDelim + 'melod.mp3'
0
843 / 738 / 342
Регистрация: 22.09.2012
Сообщений: 5,034
27.09.2015, 23:25  [ТС] 4
TEKJ,
Отлично, все заработало!
Прописал путь в Project -> Deployment assets/internal (при таком пути делфи еще и текстовую инфу создает какие файлы ты загрузил)

Написал такой код для примера:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
procedure TForm1.Button1Click(Sender: TObject);
begin
  Memo1.Text:= TPath.GetDocumentsPath + PathDelim;
  Memo1.Lines.SaveToFile(TPath.GetDocumentsPath + PathDelim + '111.txt');
  Edit1.Text:= TPath.GetDocumentsPath + PathDelim;
end;
 
procedure TForm1.Button2Click(Sender: TObject);
begin
  MediaPlayer1.FileName:= TPath.GetDocumentsPath + PathDelim + 'melod.mp3';
  MediaPlayer1.Play;
end;
 
procedure TForm1.Button3Click(Sender: TObject);
begin
   Memo1.Lines.LoadFromFile(TPath.GetDocumentsPath + PathDelim + '111.txt');
end;
Хотел бы еще узнать ответ на пару вопросов:

1) В Edit1 при таком раскладе кода я получаю строку /data/data/com.embarcadero.Project1/files/
это я так понял кэш приложения?

2) Вот по данному пути в телефоне я невижу вобще никаких файлов, а они все таки воспроизводятся и в мемо-поле грузится строка!
0
13 / 13 / 14
Регистрация: 11.11.2012
Сообщений: 147
27.09.2015, 23:46 5
И не найдете. GetCachePath - это кэш приложения, остальное это данные приложения: GetMusicPath, GetTempPath, GetPicturesPath, GetCameraPath и т.д.
Например у вас есть приложение для скачивания музыки, где пользователям требуется регистрация и авторизация.
После первой авторизации вы можете сохранить данные пользователя в какой то файл по пути GetDocumentsPath, а музыку скачивать в GetMusicPath, при этом эти данные будут доступны только из вашего приложения.
1
27.09.2015, 23:46
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.09.2015, 23:46
Помогаю со студенческими работами здесь

Проиграть мелодию «В лесу родилась елочка»
Пусть необходимо проиграть мелодию «В лесу родилась елочка». Создайте массив действительных чисел,...

Как проиграть мелодию только один раз?
на форме есть label. Каждые 5 секунд к значению в label прибавляется 1. Когда label = 5, тогда...

Win 8.1 Не поставить галочку - проиграть мелодию запуска
Никак не ставится. Может в реестре что?

Консольный будильник: как сверять время и проиграть мелодию
Добрый вечер. Задали мне тут задачку, не знаю как реализовать. Задача: Написать консольную...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru