德爾福：在64位exe中播放MP3

針對Windows7 +系統，從我的Delphi（10.2東京）應用程序播放64位的MP3播放器的簡單方法是什麼？我一直在使用32位的DSPack，但在64位它不會編譯。看看BASS，但它也不適用於64位。德爾福：在64位exe中播放MP3

最好是直接使用Windows API工作，而不是將外部dll與應用程序一起使用。

2017-06-08 hikari

有許多圖書館可以做到這一點，當然包括BASS。你放棄了嗎？您當然可以使用內置庫（例如DirectShow）來執行此操作。即使是很好的'mciSendString'。 –

一個簡單的方法是使用mciSendString。

uses 
    Winapi.MMSystem; 
.... 
mciSendString('open audiofile.mp3 type mpegvideo alias song1', nil, 0, 0); 
mciSendString('play song1', nil, 0, 0);

2017-06-08 13:54:40

有點混亂，但它完成了這項工作，做了一個小包裝，在「等待」的線程中運行，並在完成時用一個額外的調用關閉它。謝謝。（mciSendString（'play song1 wait'，.. mciSendString（'close song1'..） – hikari

回答