MP3-Player selbst schreiben, Grundvoraussetzungen?

[Gausi]

Laut Profil hast du Delphi 2009.

Das Tutorial ist noch nicht auf D2009 portiert, werde ich mal in Angriff nehmen. Man bekommt es zum Laufen, wenn man in der Methode TMeMPPlayer.MeMP_CreateStream die Flags um BASS_UNICODE erweitert. Also

Delphi-Quellcode:

function TMeMPPlayer.MeMP_CreateStream(aFilename: String): DWord;
var flags: DWORD;
begin
  if (AnsiLowerCase(ExtractFileExt(aFilename)) = '.mp3') then
    flags := BASS_STREAM_PRESCAN or BASS_UNICODE
  else
    flags := BASS_UNICODE;
  result := BASS_StreamCreateFile(False, PChar(aFilename), 0, 0, flags);
end;

Dadruch wird der Parameter Filename von der bass.dll als WideChar interpretiert, was ja ein Char unter D2009 ist. Das müsste ich mal über Compiler-Schalter sauber einbauen. Auch das Laden der Plugins könnte noch Schwierigkeiten machen - stört aber nicht für die Basisfunktion.