Как воспроизвести звуковой файл в среде PascalABC.NET


#1

Как воспроизвести звуковой файл в среде PascalABC.Net???


#2

Чем больше вопросительных знаков в конце предложения, тем быстрее ответят, да :slight_smile:

Первая ссылка.


#3

вторая ссылка - для не желающих пользоваться поиском по форуму


#4
uses Sounds;

begin
  PlaySound('a.wav');
end.

#5

uses Sounds;

begin PlaySound(‘a.wav’); end.

Эта программка в PascalABC.NET v 3.3 выдаёт ошибку: модуль ‘Sounds’ не найден.

В программе PascalABC v 3.0.1.35 (20.12.2011) выдаёт ошибку: нельзя преобразовать выражение типа string к типу integer.

Так как же всё-таки воспроизвести звуковой файл в простой программе, написанной в PascalABC.NET v 3.3

Опишите, пожалуйста, последовательность действий, чтобы прослушать звуковой файл wav в простой школьной программе на Паскале.

Например, что делать с этим фрагментом:

{$reference ‘PresentationCore.dll’} uses GraphABC; begin var fsound := new System.Windows.Media.MediaPlayer; fsound.Open(new System.Uri(‘СО’, System.UriKind.Relative)); fsound.Play; end.

и куда его впихнуть. Заранее очень благодарен!


#6

Версия 3.3 - это период с сентября 2017 года по май 2018 года. С тех пор много изменений было сделано. Вы серьезно думаете, что кто-то будет держать у себя все старые версии?

А PascalABC v 3.0.1.35 (20.12.2011) - это вообще даже не .NET, программа восьмилетней (!) давности.


#7

Как воспроизвести звуковой файл в простой школьной программе на Паскале в последней версии PascalABC.NЕТ на сегодняшний день?


#8

А книжку лень почитать?

ЗАНИМАТЕЛЬНЫЕ УРОКИ С ПАСКАЛЕМ


#9
  1. По PascalABC.Net книжек почти нет. И та что вы назвали не по нему, явно.
  2. Тут не всякие “занимательные” книжки читать надо, а идти читать документацию на msdn или ответы на StackOverflow.
  3. Ему лень даже по 2 ссылкам перейти, которые ему сразу дали, не то что там книжки читать…

#10

не работают Ваши ссылки, не говоря про книжки. Если Вы такие умные, то что Вам стоит написать фрагмент программы на PascalABC.NET для воспроизведения звукового файла.


#11

Работают они. Вот со второй код:

{$reference PresentationCore.dll}
uses GraphABC;

begin
  var fsound := new System.Windows.Media.MediaPlayer;
  fsound.Open(new System.Uri('D:\Новый год в салоне самолета.mp3'));
  fsound.Play;
end.

#12

Не воспроизводит, только на экране белое графическое окно


#13

А, да, uses GraphABC там вообще не нужен. А путь к файлу вы прописали? И какое у него расширение.


#14

Путь к файлу прописан. Испробовал форматы mp3 и wav. Компиляция проходит успешно, ошибок нет и звука нет.


#15

Поставьте readln; в конце, а то программа завершается до того как звук начнёт воспроизводится. Я поставил - у меня всё работает.


#16
uses Sounds;

begin
  PlaySound('Полный путь к файлу *.wav');
  ReadInteger
end.