Seite 1 von 1

Streamwiedergabe

Verfasst: 06.10.2006 10:53
von RSBasic
Hi ihr, ich habe ein Problem, ich habe was programmiert, das ich Videos und Musik abspielen kann. Aber ich möchte auch, dass ich die Videos, Musik und Radio wie Stream abspielen möchte. Es funktioniert nicht, könnt ihr mir helfen? :|

Code: Alles auswählen

If InitMovie()=0
  MessageRequester("Fehler","This setup can not init!",0)
EndIf
If InitSound()=0
  MessageRequester("Fehler","This setup can not init!",0)
EndIf
;LoadMovie(1,"mms://giga.streamed.by.ngz-server.de.esl-tv.net/GIGA")
LoadSound(3,"http://club-high.rautemusik.fm")
Procedure AlertThread(Parameter)
Repeat
Delay(20000)
SetGadgetText(1,Str(MovieInfo(0)))
Delay(0)
ForEver
EndProcedure
Procedure AlertThread1(Parameter)
PlayMovie(3, WindowID())
EndProcedure
If OpenWindow(0, 0, 0, 800, 800, #PB_Window_SystemMenu, "Play")
  If CreateGadgetList(WindowID())
    TextGadget(1,10,610,100,20,"",0)
  EndIf
  ;PlayMovie(1, WindowID())
  ;PlaySound(2,0)
  CreateThread(@AlertThread1(), 154)
  ;Delay(0)
  ;CreateThread(@AlertThread(), 154)
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

Verfasst: 06.10.2006 13:26
von Fluid Byte
Weder mit LoadMovie() noch mit LoadSound() kannst du Streams aus dem Internet laden. Wäre mir jedenfalls recht neu.

Verfasst: 06.10.2006 14:11
von RSBasic
und wie soll ich dann machen? bitte helft mir :|

Verfasst: 06.10.2006 14:19
von Kiffi
RSBasic hat geschrieben:und wie soll ich dann machen? bitte helft mir :|
lade den Link in ein WebGadget, welches Du in Deinem Fenster platzierst.

Grüße ... Kiffi

Verfasst: 06.10.2006 14:26
von RSBasic
@ Kiffi
Danke, hab noch ne Frage, gibt es noch ne Möglichkeit, außer dem Webgadget? :)

Verfasst: 06.10.2006 14:45
von Kiffi
RSBasic hat geschrieben:gibt es noch ne Möglichkeit, außer dem Webgadget? :)
doch: Man packt den Mediaplayer auf das Fenster und lässt ihn den Link
abspielen. Den Code hierfür gibt's hier:

http://www.purebasic.fr/german/viewtopic.php?t=9710

Das Problem: Mit Deiner PB-Version wird das wahrscheinlich nicht klappen.

Grüße ... Kiffi

Verfasst: 06.10.2006 14:51
von RSBasic
@ Kiffi
Vielen Dank, oh dann müsste ich mich darauf einstellen, dass ich die Upgrade-Version bestellen muss, ich bedanke mich bei allen, die mir geholfen haben :allright: