
procedure InitALProcAddresses;
begin
  pointer(alcCreateContext):= GetALProcAddress('alcCreateContext');
  pointer(alcMakeContextCurrent):= GetALProcAddress('alcMakeContextCurrent');
  pointer(alcProcessContext):= GetALProcAddress('alcProcessContext');
  pointer(alcSuspendContext):= GetALProcAddress('alcSuspendContext');
  pointer(alcDestroyContext):= GetALProcAddress('alcDestroyContext');
  pointer(alcGetCurrentContext):= GetALProcAddress('alcGetCurrentContext');
  pointer(alcGetContextsDevice):= GetALProcAddress('alcGetContextsDevice');
  pointer(alcOpenDevice):= GetALProcAddress('alcOpenDevice');
  pointer(alcCloseDevice):= GetALProcAddress('alcCloseDevice');
  pointer(alcGetError):= GetALProcAddress('alcGetError');
  pointer(alcGetString):= GetALProcAddress('alcGetString');
  pointer(alcGetIntegerv):= GetALProcAddress('alcGetIntegerv');
  pointer(alEnable):= GetALProcAddress('alEnable');
  pointer(alDisable):= GetALProcAddress('alDisable');
  pointer(alIsEnabled):= GetALProcAddress('alIsEnabled');
  pointer(alGetString):= GetALProcAddress('alGetString');
  pointer(alGetBooleanv):= GetALProcAddress('alGetBooleanv');
  pointer(alGetIntegerv):= GetALProcAddress('alGetIntegerv');
  pointer(alGetFloatv):= GetALProcAddress('alGetFloatv');
  pointer(alGetDoublev):= GetALProcAddress('alGetDoublev');
  pointer(alGetBoolean):= GetALProcAddress('alGetBoolean');
  pointer(alGetInteger):= GetALProcAddress('alGetInteger');
  pointer(alGetFloat):= GetALProcAddress('alGetFloat');
  pointer(alGetDouble):= GetALProcAddress('alGetDouble');
  pointer(alGetError):= GetALProcAddress('alGetError');
  pointer(alIsExtensionPresent):= GetALProcAddress('alIsExtensionPresent');
  pointer(alGetProcAddress):= GetALProcAddress('alGetProcAddress');
  pointer(alGetEnumValue):= GetALProcAddress('alGetEnumValue');
  pointer(alListenerf):= GetALProcAddress('alListenerf');
  pointer(alListener3f):= GetALProcAddress('alListener3f');
  pointer(alListenerfv):= GetALProcAddress('alListenerfv');
  pointer(alListeneri):= GetALProcAddress('alListeneri');
  pointer(alListener3i):= GetALProcAddress('alListener3i');
  pointer(alListeneriv):= GetALProcAddress('alListeneriv');
  pointer(alGetListenerf):= GetALProcAddress('alGetListenerf');
  pointer(alGetListener3f):= GetALProcAddress('alGetListener3f');
  pointer(alGetListenerfv):= GetALProcAddress('alGetListenerfv');
  pointer(alGetListeneri):= GetALProcAddress('alGetListeneri');
  pointer(alGetListener3i):= GetALProcAddress('alGetListener3i');
  pointer(alGetListeneriv):= GetALProcAddress('alGetListeneriv');
  pointer(alGenSources):= GetALProcAddress('alGenSources');
  pointer(alDeleteSources):= GetALProcAddress('alDeleteSources');
  pointer(alIsSource):= GetALProcAddress('alIsSource');
  pointer(alSourcef):= GetALProcAddress('alSourcef');
  pointer(alSource3f):= GetALProcAddress('alSource3f');
  pointer(alSourcefv):= GetALProcAddress('alSourcefv');
  pointer(alSourcei):= GetALProcAddress('alSourcei');
//  alSource3i):= GetALProcAddress('alSource3i');
//  alSourceiv):= GetALProcAddress('alSourceiv');
  pointer(alGetSourcef):= GetALProcAddress('alGetSourcef');
  pointer(alGetSource3f):= GetALProcAddress('alGetSource3f');
  pointer(alGetSourcefv):= GetALProcAddress('alGetSourcefv');
  pointer(alGetSourcei):= GetALProcAddress('alGetSourcei');
//  alGetSource3i):= GetALProcAddress('alGetSource3i');
//  alGetSourceiv):= GetALProcAddress('alGetSourceiv');
  pointer(alSourcePlayv):= GetALProcAddress('alSourcePlayv');
  pointer(alSourceStopv):= GetALProcAddress('alSourceStopv');
  pointer(alSourceRewindv):= GetALProcAddress('alSourceRewindv');
  pointer(alSourcePausev):= GetALProcAddress('alSourcePausev');
  pointer(alSourcePlay):= GetALProcAddress('alSourcePlay');
  pointer(alSourceStop):= GetALProcAddress('alSourceStop');
  pointer(alSourceRewind):= GetALProcAddress('alSourceRewind');
  pointer(alSourcePause):= GetALProcAddress('alSourcePause');
  pointer(alSourceQueueBuffers):= GetALProcAddress('alSourceQueueBuffers');
  pointer(alSourceUnqueueBuffers):= GetALProcAddress('alSourceUnqueueBuffers');
  pointer(alGenBuffers):= GetALProcAddress('alGenBuffers');
  pointer(alDeleteBuffers):= GetALProcAddress('alDeleteBuffers');
  pointer(alIsBuffer):= GetALProcAddress('alIsBuffer');
  pointer(alBufferData):= GetALProcAddress('alBufferData');
  pointer(alBufferf):= GetALProcAddress('alBufferf');
  pointer(alBuffer3f):= GetALProcAddress('alBuffer3f');
  pointer(alBufferfv):= GetALProcAddress('alBufferfv');
  pointer(alBufferi):= GetALProcAddress('alBufferi');
  pointer(alBuffer3i):= GetALProcAddress('alBuffer3i');
  pointer(alBufferiv):= GetALProcAddress('alBufferiv');
  pointer(alGetBufferf):= GetALProcAddress('alGetBufferf');
  pointer(alGetBuffer3f):= GetALProcAddress('alGetBuffer3f');
  pointer(alGetBufferfv):= GetALProcAddress('alGetBufferfv');
  pointer(alGetBufferi):= GetALProcAddress('alGetBufferi');
  pointer(alGetBuffer3i):= GetALProcAddress('alGetBuffer3i');
  pointer(alGetBufferiv):= GetALProcAddress('alGetBufferiv');
  pointer(alDopplerFactor):= GetALProcAddress('alDopplerFactor');
  pointer(alDopplerVelocity):= GetALProcAddress('alDopplerVelocity');
  pointer(alSpeedOfSound):= GetALProcAddress('alSpeedOfSound');
  pointer(alDistanceModel):= GetALProcAddress('alDistanceModel');
end;
