Цитата:
|
Сообщение от NumLock
я тебе по секрету скажу: скопируй exe и mp3 в какую-нибудь папку и замени "я узнал что у меня.mp3" на другой mp3, но с тем же именем, проще говоря подмени mp3. теперь запусти exe из 1 и 2 папки.
|
И таких программок штук десять и каждую запускать
Вот кое что нарыл, но все же маловато. Цикла нету, да и почему-то воспроизводит только MP3, WAV и MIDI не читает.
Код:
Пример кода
mciSendString(PChar('Play "C:\Sound.wav"'),nil,0,0);
Команды
Воспроизвести - Play "C:\Sound.wav"
Остановить - Stop "C:\Sound.wav"
Приостановить - Pause "C:\Sound.wav"
Ожидание - Play "C:\Sound.wav" Wait
Закрыть звук - Close WaveAudio