Fernsehen im Fenster
Verfasst: 24.01.2019 22:31
Ich möchte ein Fenster erstellen wo ich z.B. Amazon Prime Filme anschauen kann.
Das Fenster sollte immer im Vordergrund seien und oben links in der Ecke des Bildschirm.
Beispiel :
Leider geht das nicht mit Webgadget weil der Browser zu alt ist.
Wie kann ich das ändern ?
Das Fenster sollte immer im Vordergrund seien und oben links in der Ecke des Bildschirm.
Beispiel :
Code: Alles auswählen
#Escape=10
If OpenWindow (1, 1024, 0, 900 , 500 , " WebGadget ", #PB_Window_SystemMenu)
StickyWindow(1,1)
AddKeyboardShortcut(1, #PB_Shortcut_Escape,#Escape)
WebGadget (1, 0, 0, 900 , 500 , "https://www.amazon.de/Prime-Video/")
Define myBrowser.IWebBrowser2 = GetWindowLongPtr_(GadgetID(1), #GWL_USERDATA)
myBrowser\put_Silent(#True)
SetActiveGadget(1)
Repeat
Event=WaitWindowEvent(10)
Select Event
Case #PB_Event_Menu
Select EventGadget()
Case #Escape
CloseWindow(1)
UseGadgetList(WindowID(0))
End
EndSelect
EndSelect
Until Event = #PB_Event_CloseWindow
CloseWindow(1)
EndIf
Wie kann ich das ändern ?