Anwendung unicodefähig machen?

[AlexII]

Zitat von Bernhard Geyer:

Zitat von AlexII:

Zitat von hoika:

Hallo,

Du brauchst eine Unicodefähige Schnittstellenbeschreibung.

bass.dll ist eigentlich schon Unicodefähig... hm...

Die API ist AnsiString. Mit gesetzten Flag werden die Strings UTF8-Codiert erwartet.

Das heißt ich kann alles so lassen wie oben im Beispiel? Bin jetzt noch mehr verwirrt.

[Bernhard Geyer]

Zitat von AlexII:

Zitat von Bernhard Geyer:

Zitat von AlexII:

Zitat von hoika:

Hallo,

Du brauchst eine Unicodefähige Schnittstellenbeschreibung.

bass.dll ist eigentlich schon Unicodefähig... hm...

Die API ist AnsiString. Mit gesetzten Flag werden die Strings UTF8-Codiert erwartet.

Das heißt ich kann alles so lassen wie oben im Beispiel? Bin jetzt noch mehr verwirrt.

AFAIK nein. Du musst dafür sorgen das alle Strings UTF8 Codiert werden. Delphi (ab D2009) verwendet standardmäßig UTF-16 (String) bzw. AnsiStrings (AnsiString). Evtl. reicht es die Schnittstellendefinition von (Ansi-)String auf UTF8-String zu ändern. Evtl. sorgt die Compiler-Magic hier für eine automatische Codierung

[wicht]

Moin!

Dein BASS_StreamCreateURL-Aufruf muss so aussehen:

chan := BASS_StreamCreateURL(url, 0, BASS_STREAM_BLOCK or BASS_STREAM_STATUS or BASS_STREAM_AUTOFREE or BASS_UNICODE, @StatusProc, nil);

Man beachte dabei das Flag BASS_UNICODE. "url" muss dann natürlich PChar werden, oder PWideChar, aber nicht PAnsiChar. Das steht alles in der Hilfe, die mit BASS ausgeliefert wird.

[AlexII]

Zitat von wicht:

Moin!

Dein BASS_StreamCreateURL-Aufruf muss so aussehen:

chan := BASS_StreamCreateURL(url, 0, BASS_STREAM_BLOCK or BASS_STREAM_STATUS or BASS_STREAM_AUTOFREE or BASS_UNICODE, @StatusProc, nil); Man beachte dabei das Flag BASS_UNICODE. "url" muss dann natürlich PChar werden, oder PWideChar, aber nicht PAnsiChar. Das steht alles in der Hilfe, die mit BASS ausgeliefert wird.

In der bass.pas steht aber folgendes:

function BASS_StreamCreateURL(url: PAnsiChar; offset: DWORD; flags: DWORD; proc: DOWNLOADPROC; user: Pointer):HSTREAM; {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF}; external bassdll; url ist also vom Datentyp PAnsiChar. Darf ist den Datentyp an dieser Stelle ändern? Habe es auch gemacht, bekomme aber einen Fehler.

[wicht]

Tatsache. Änder die Funktion mal zum Testen auf "Pointer". Ich nutze die Funktion BASSStreamCreateFile, die nimmt einen Pointer entgegen, und laut Hilfe ist das BASS_UNICODE Flag für beide Funktionen gültig. Das könnte mit etwas Glück funktionieren...

[AlexII]

Zitat von wicht:

Tatsache. Änder die Funktion mal zum Testen auf "Pointer". Ich nutze die Funktion BASSStreamCreateFile, die nimmt einen Pointer entgegen, und laut Hilfe ist das BASS_UNICODE Flag für beide Funktionen gültig. Das könnte mit etwas Glück funktionieren...

Ne da habe ich leider kein Glück, es funktioniert nicht.

[SonnyBoyPro]

Hallo Alex II,

falls das Problem noch nicht gelöst wurde:

Definition in BASS.h

Code:

static inline HSTREAM BASS_StreamCreateURL(const WCHAR *url, DWORD offset, DWORD flags, DOWNLOADPROC *proc, void *user)
{
   return BASS_StreamCreateURL((const char*)url, offset, flags|BASS_UNICODE, proc, user);
}

daher
in BASS.pas function BASS_StreamCreateURL(url: PWideChar; offset: DWORD; flags: DWORD; proc: DOWNLOADPROC; user: Pointer):HSTREAM; {$IFDEF MSWINDOWS}stdcall{$ELSE}cdecl{$ENDIF}; external bassdll; ändern und
schon klappt der Aufruf
 FWebRadioStream := BASS_StreamCreateURL(pWideChar(s), 0, BASS_UNICODE or BASS_STREAM_BLOCK or BASS_STREAM_STATUS or BASS_STREAM_AUTOFREE, @StatusProc, nil); bg