hedgewars/SDLh.pas
changeset 7615 b39beffcf05e
parent 7565 00568d3054d0
child 8022 10b3b93c1f56
child 8026 4a4f21070479
equal deleted inserted replaced
7614:3ae60c8a15f2 7615:b39beffcf05e
   825 
   825 
   826     PMixMusic = ^TMixMusic;
   826     PMixMusic = ^TMixMusic;
   827     TMixMusic = record
   827     TMixMusic = record
   828                 end;
   828                 end;
   829 
   829 
       
   830     TPostMix = procedure(udata: pointer; stream: PByte; len: LongInt); cdecl;
       
   831 
   830     {* SDL_net *}
   832     {* SDL_net *}
   831     TIPAddress = record
   833     TIPAddress = record
   832                 host: LongWord;
   834                 host: LongWord;
   833                 port: Word;
   835                 port: Word;
   834                 end;
   836                 end;
   954 function  SDL_LockMutex(mutex: PSDL_mutex): LongInt; cdecl; external SDLLibName name 'SDL_mutexP';
   956 function  SDL_LockMutex(mutex: PSDL_mutex): LongInt; cdecl; external SDLLibName name 'SDL_mutexP';
   955 function  SDL_UnlockMutex(mutex: PSDL_mutex): LongInt; cdecl; external SDLLibName name 'SDL_mutexV';
   957 function  SDL_UnlockMutex(mutex: PSDL_mutex): LongInt; cdecl; external SDLLibName name 'SDL_mutexV';
   956 
   958 
   957 function  SDL_GL_SetAttribute(attr: TSDL_GLattr; value: LongInt): LongInt; cdecl; external SDLLibName;
   959 function  SDL_GL_SetAttribute(attr: TSDL_GLattr; value: LongInt): LongInt; cdecl; external SDLLibName;
   958 procedure SDL_GL_SwapBuffers; cdecl; external SDLLibName;
   960 procedure SDL_GL_SwapBuffers; cdecl; external SDLLibName;
       
   961 
       
   962 procedure SDL_LockAudio; cdecl; external SDLLibName;
       
   963 procedure SDL_UnlockAudio; cdecl; external SDLLibName;
   959 
   964 
   960 function  SDL_NumJoysticks: LongInt; cdecl; external SDLLibName;
   965 function  SDL_NumJoysticks: LongInt; cdecl; external SDLLibName;
   961 function  SDL_JoystickName(idx: LongInt): PChar; cdecl; external SDLLibName;
   966 function  SDL_JoystickName(idx: LongInt): PChar; cdecl; external SDLLibName;
   962 function  SDL_JoystickOpen(idx: LongInt): PSDL_Joystick; cdecl; external SDLLibName;
   967 function  SDL_JoystickOpen(idx: LongInt): PSDL_Joystick; cdecl; external SDLLibName;
   963 function  SDL_JoystickOpened(idx: LongInt): LongInt; cdecl; external SDLLibName;
   968 function  SDL_JoystickOpened(idx: LongInt): LongInt; cdecl; external SDLLibName;
  1006 function  Mix_Init(flags: LongInt): LongInt; {$IFDEF SDL_MIXER_NEWER}cdecl; external SDL_MixerLibName;{$ENDIF}
  1011 function  Mix_Init(flags: LongInt): LongInt; {$IFDEF SDL_MIXER_NEWER}cdecl; external SDL_MixerLibName;{$ENDIF}
  1007 procedure Mix_Quit; {$IFDEF SDL_MIXER_NEWER}cdecl; external SDL_MixerLibName;{$ENDIF}
  1012 procedure Mix_Quit; {$IFDEF SDL_MIXER_NEWER}cdecl; external SDL_MixerLibName;{$ENDIF}
  1008 
  1013 
  1009 function  Mix_OpenAudio(frequency: LongInt; format: Word; channels: LongInt; chunksize: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1014 function  Mix_OpenAudio(frequency: LongInt; format: Word; channels: LongInt; chunksize: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1010 procedure Mix_CloseAudio; cdecl; external SDL_MixerLibName;
  1015 procedure Mix_CloseAudio; cdecl; external SDL_MixerLibName;
       
  1016 function  Mix_QuerySpec(frequency: PLongInt; format: PWord; channels: PLongInt): LongInt; cdecl; external SDL_MixerLibName;
  1011 
  1017 
  1012 function  Mix_Volume(channel: LongInt; volume: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1018 function  Mix_Volume(channel: LongInt; volume: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1013 function  Mix_SetDistance(channel: LongInt; distance: Byte): LongInt; cdecl; external SDL_MixerLibName;
  1019 function  Mix_SetDistance(channel: LongInt; distance: Byte): LongInt; cdecl; external SDL_MixerLibName;
  1014 function  Mix_VolumeMusic(volume: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1020 function  Mix_VolumeMusic(volume: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1015 
  1021 
  1032 function  Mix_HaltChannel(channel: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1038 function  Mix_HaltChannel(channel: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1033 function  Mix_HaltMusic: LongInt; cdecl; external SDL_MixerLibName;
  1039 function  Mix_HaltMusic: LongInt; cdecl; external SDL_MixerLibName;
  1034 
  1040 
  1035 function  Mix_FadeInChannelTimed(channel: LongInt; chunk: PMixChunk; loops: LongInt; fadems: LongInt; ticks: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1041 function  Mix_FadeInChannelTimed(channel: LongInt; chunk: PMixChunk; loops: LongInt; fadems: LongInt; ticks: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1036 function  Mix_FadeOutChannel(channel: LongInt; fadems: LongInt): LongInt; cdecl; external SDL_MixerLibName;
  1042 function  Mix_FadeOutChannel(channel: LongInt; fadems: LongInt): LongInt; cdecl; external SDL_MixerLibName;
       
  1043 
       
  1044 procedure Mix_SetPostMix( mix_func: TPostMix; arg: pointer); cdecl; external SDL_MixerLibName;
  1037 
  1045 
  1038 (*  SDL_image  *)
  1046 (*  SDL_image  *)
  1039 function  IMG_Init(flags: LongInt): LongInt; {$IFDEF SDL_IMAGE_NEWER}cdecl; external SDL_ImageLibName;{$ENDIF}
  1047 function  IMG_Init(flags: LongInt): LongInt; {$IFDEF SDL_IMAGE_NEWER}cdecl; external SDL_ImageLibName;{$ENDIF}
  1040 procedure IMG_Quit; {$IFDEF SDL_IMAGE_NEWER}cdecl; external SDL_ImageLibName;{$ENDIF}
  1048 procedure IMG_Quit; {$IFDEF SDL_IMAGE_NEWER}cdecl; external SDL_ImageLibName;{$ENDIF}
  1041 
  1049