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

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

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

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

2 лайка

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

uses Sounds;

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

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.

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

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

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

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

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

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

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

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

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

{$reference PresentationCore.dll}
uses GraphABC;

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

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

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

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

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

uses Sounds;

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