webcam en live
Publié : dim. 21/sept./2008 16:50
bonjour,
voila aujourd'hui j'ai découvert un site ou il diffuse votre webcam sur une page web sans rien installer c'est marrant j'ai donc intégrer la page web dans une fenêtre de purebasic et voici ce que sa donne bon sa sert a rien mais je le met quand meme
@++
voila aujourd'hui j'ai découvert un site ou il diffuse votre webcam sur une page web sans rien installer c'est marrant j'ai donc intégrer la page web dans une fenêtre de purebasic et voici ce que sa donne bon sa sert a rien mais je le met quand meme

Code : Tout sélectionner
;- Window Constants
Enumeration
#Window_0
EndEnumeration
;- Gadget Constants
Enumeration
#Web_0
EndEnumeration
If OpenWindow(#Window_0, 0, 0, 500, 410, "My Venom Cam", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_TitleBar | #PB_Window_ScreenCentered )
If CreateGadgetList(WindowID(#Window_0))
WebGadget(#Web_0, 0, -155, 515, 580, "http://venomworld.blog-video.tv/")
EndIf
EndIf
Repeat
EventID = WaitWindowEvent()
If EventID = #PB_Event_Gadget
Select EventGadget()
EndSelect
EndIf
Until EventID = #PB_Event_CloseWindow
@++