Urls ist ein Array of String.
Delphi-Quellcode:
function TfrmMain.StartPlayStream(anURL : String) : THandle;
var ThreadId : Cardinal;
begin
Result := BeginThread(nil, 0, @OpenURL, PChar(anURL), 0, ThreadId); // urls = TDynStrArray
end;
procedure TfrmMain.lvDblClick(Sender: TObject);
var s : String;
begin
s := urls[0];
cthread := StartPlayStream(s);
end;
Zitat:
---------------------------
Fehler
---------------------------
Can't play the stream
(error code: 0)
---------------------------
OK
---------------------------