Probleme mit FMod

[mimi]

also bei:

Code:

var
  test:PFMusicModule;
  Datei:String;
  Stream: PFSoundStream;
  Channel: Integer;

begin
  Datei:='E:\test.it';

// OPEN STREAM
  Stream := FSOUND_Stream_OpenFile(PChar(Datei), FSOUND_LOOP_NORMAL or FSOUND_NORMAL, 0);
  if stream = nil then
    begin
      Showmessage('Error! Opening file - ' + FMOD_ErrorString(FSOUND_GetError()));
      FSOUND_Close();
      Exit;
    end;

// PLAY STREAM
  channel := FSOUND_Stream_Play(FSOUND_FREE, stream);
  if channel < 0 then
    begin
      showmessage('Error! Play - ' + FMOD_ErrorString(FSOUND_GetError()));
      FSOUND_Close();
      exit;
    end;

so sieht nur nun der code aus
aber es kommt eine Fehlermeldung vom Programm.
Fehlermeldung:

Code:

Error! Opening file - This command failed because FSound_Init was not called

was einer was los ist ?

MFG
Michael Springwald