Озвучить кнопки

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Ответить
freeno
незнакомец
Сообщения: 2
Зарегистрирован: 11.05.2009 12:00:51

Озвучить кнопки

Сообщение freeno »

Озвучить button системным звуком в Linux.
Аватара пользователя
Attid
долгожитель
Сообщения: 2589
Зарегистрирован: 27.10.2006 17:29:15
Откуда: 44°32′23.63″N 41°2′25.2″E
Контактная информация:

Сообщение Attid »

интересное сообщение.
думаю что было бы не плохо.
freeno
незнакомец
Сообщения: 2
Зарегистрирован: 11.05.2009 12:00:51

Сообщение freeno »

А что данная возможность на Lazarus еще не реализована?Просто на Delphi под Windows можно. На Lazarus незнаю
Аватара пользователя
EmeraldMan
постоялец
Сообщения: 149
Зарегистрирован: 16.10.2008 08:41:51
Откуда: Белгород
Контактная информация:

Сообщение EmeraldMan »

freeno писал(а):А что данная возможность на Lazarus еще не реализована?Просто на Delphi под Windows можно. На Lazarus незнаю

Под Win и на Lazarus элементарно - на событие OnClick

Код: Выделить всё

uses
  mmsystem;

//Play
sndPlaySound('C:\sound.wav, SND_ASYNC);

// Loop Mode (зацикливание)
sndPlaySound('C:\sound.wav', SND_ASYNC + SND_LOOP);

//STOP
sndPlaySound(nil, SND_ASYNC);


Кстати говоря, если из Delphi взять модуль MediaPlayer'а, то он буде работать и в Lazarus, немножко подправить только надо.
Со звуками в Linux ещё не разбирался и самому интересна данная тема.
Можно ли с помощью аналогичных функций так же просто запустить звук и в Linux?..
Аватара пользователя
B4rr4cuda
энтузиаст
Сообщения: 693
Зарегистрирован: 28.12.2007 06:48:35

Сообщение B4rr4cuda »

Код: Выделить всё

fpsystem('aplay path'); 

не пойдет?
kosteek
постоялец
Сообщения: 203
Зарегистрирован: 24.07.2008 14:57:09
Откуда: Украина, г.Славянск

Сообщение kosteek »

А если нужно генерировать разную частоту и работать через буфер?
Аватара пользователя
B4rr4cuda
энтузиаст
Сообщения: 693
Зарегистрирован: 28.12.2007 06:48:35

Сообщение B4rr4cuda »

Тыц на сях, с использованием аудиокарты напрямую. Перенестись на pas должно без проблем.
Ответить