you can use function:
InitOpenAL(LibName: String): Boolean;
with the unit you can download from: http://www.noeska.com/doal/downloads.aspx
that uses dynamic loading.
PS looking at the code now it seems that
is placed to low it should be placed before:Code:if (LibHandle <> 0) then
Now when calling InitOpenAl it should return true when openal is available and false when not.Code:alGetProcAddress := GetProcAddress(LibHandle, 'alGetProcAddress');
Bookmarks