Einzelnen Beitrag anzeigen

value is NULL

Registriert seit: 10. Sep 2010
249 Beiträge
 
#1

Devices in chinesisch?? Bass.dll

  Alt 30. Jan 2014, 11:53
Hi Community

ich verwende die BASS.dll um die Audio Devices auszuelesen.
Diese trage ich dann per Schleife in eine Combobox.

Folgender Code:

Delphi-Quellcode:
var
  deviceInfo: BASS_DEVICEINFO;

....

procedure TForm1.FormCreate(Sender: TObject);
var
  i : Integer;
begin
  // check the correct BASS was loaded
  if (HIWORD(BASS_GetVersion) <> BASSVERSION) then
  begin
    Showmessage('An incorrect version of BASS.DLL was loaded');
    Halt;
  end;
  if (not BASS_Init(-1, 44100, 0, 0, nil)) then
  begin
    Showmessage('Can''t initialize device');
    Halt;
  end;

  i:= 0;
  while (BASS_GetDeviceInfo(i, deviceInfo) <> false) do
  begin
    if deviceInfo.name <> 'No soundthen cbOutputDevices.Items.Add(PChar(deviceInfo.name));
    Inc(i);
  end;

end;
ich bekomme aber folgendes Ergebnis, siehe Screenshot.

Warum zum Teufel sieht das so aus ^^

Danke und LG
Miniaturansicht angehängter Grafiken
scr.jpg  
  Mit Zitat antworten Zitat