首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
您现在的位置: 程式碼之家 >> 編程語言 >  >> 更多程式語言 >> Delphi

Delphi 環境配置 Bass.dll 完整教程:下載、部署、路徑設置與版本驗證測試

     編輯:Delphi

前言

Bass.dll 是知名第三方音頻庫(官網 un4seen.com),非 Windows 系統內建。本文詳細記錄從下載、部署 DLL、配置 Delphi Library Path、編寫版本驗證測試代碼的全過程,助你零障礙上手。

獲取 Bass.dll

  • 官網下載頁:bass24.zip(含 bass.dll、bass.pas、文檔、範例)。
  • 當前最新版本:2.4.11(版本號十六進制 $2040101)。

三步部署流程

  1. 放置 bass.dll:複製到 Windows\System32、Windows\SysWOW64(64位系統)、程式目錄或任意 PATH 目錄。
  2. 放置 bass.pas:建立目錄如 C:\Imports\Bass24,將解壓出的 bass.pas 放入。
  3. 配置 Library Path:Delphi 選單 Tools → Options → Environment Options → Delphi Options → Library → Library Path,點選「...」新增上述目錄。

版本驗證測試代碼

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

uses Bass;

procedure TForm1.FormCreate(Sender: TObject);
begin
  {顯示 bass.pas 編譯時常量 BASSVERSION (主版本號)}
  ShowMessageFmt('%x', [BASSVERSION]);        {輸出: 204}
  {顯示運行時 bass.dll 完整版本號}
  ShowMessageFmt('%x', [BASS_GetVersion]);    {輸出: 2040101}
  {驗證主版本號一致性}
  if HiWord(BASS_GetVersion) <> BASSVERSION then
    ShowMessage('當前 Bass.dll 版本不可用')
  else
    ShowMessage('OK! 版本匹配,可以開始開發。');
end;

end.

版本號解讀

  • BASSVERSION:bass.pas 中定義的常量,僅含主版本號(如 $204 代表 2.4)。
  • BASS_GetVersion:運行時從 bass.dll 獲取的完整版本(如 $2040101 代表 2.4.1.1)。
  • 驗證邏輯:HiWord(BASS_GetVersion) 提取高 16 位(主版本號),與 BASSVERSION 比較。僅主版本號一致即可保證 API 相容。

Bass.dll 核心 API 概覽(節選)

BASS_Init, BASS_Free, BASS_StreamCreateFile, BASS_StreamCreateURL,
BASS_ChannelPlay, BASS_ChannelPause, BASS_ChannelStop,
BASS_ChannelSetAttribute, BASS_ChannelGetAttribute,
BASS_ChannelSetPosition, BASS_ChannelGetPosition,
BASS_ChannelGetLevel, BASS_ChannelGetLength,
BASS_ChannelSetSync, BASS_ChannelRemoveSync,
BASS_SetConfig, BASS_GetConfig,
BASS_RecordStart, BASS_RecordGetInputName,
... 共 100+ 函數

常見部署問題 FAQ

Q: 程式在別台電腦報「找不到 bass.dll」
A: 確保 bass.dll 隨程式同目錄部署,或寫入安裝腳本複製至 System32/SysWOW64。
Q: Delphi 64 位編譯報錯
A: 需使用 64 位版 bass.dll(官網提供 bass64.dll),並確保 bass.pas 支援 64 位(新版已支援)。
Q: 版本驗證失敗
A: 檢查 bass.pas 是否為最新版,或 bass.dll 是否被舊版覆蓋。

總結

完成「DLL 部署 → 路徑配置 → 版本驗證」三步,即可在 Delphi 中安穩使用 Bass.dll 開發專業音頻應用。

  1. 上一篇文章:
  2. 下一篇文章:
Copyright © 程式碼之家 All Rights Reserved