gestern dachte ich noch, es liegt an den 28° im Büro, ich komme aber auch heute Morgen nicht weiter.
Ich versuche nach folgendem Muster eine Prozedur mit WebGadget als Thread laufen zu lassen.
folgendes funktioniert (Syntax also OK):
Code: Alles auswählen
Procedure _zeigeGadget(dummy)
WebGadget(10, 0, 0, 1000, 600, "www.google.de")
EndProcedure
OpenWindow(0,0,0,1000,600,"Window",#PB_Window_ScreenCentered)
_zeigeGadget(0)
Repeat
Select WaitWindowEvent(1)
Case #PB_Event_Menu
End
EndSelect
ForEver
Code: Alles auswählen
Procedure _zeigeGadget(dummy)
;WebGadget(10, 0, 0, 1000, 600, "www.google.de")
TextGadget(2,10,10,100,20,"Text")
Repeat
Delay(1000)
ForEver
EndProcedure
OpenWindow(0,0,0,1000,600,"Window",#PB_Window_ScreenCentered)
CreateThread(@_zeigeGadget(),0)
Repeat
Select WaitWindowEvent(1)
Case #PB_Event_CloseWindow
End
EndSelect
ForEver
Code: Alles auswählen
Procedure _zeigeGadget(dummy)
WebGadget(10, 0, 0, 1000, 600, "www.google.de")
;TextGadget(2,10,10,100,20,"Text")
Repeat
Delay(1000)
ForEver
EndProcedure
OpenWindow(0,0,0,1000,600,"Window",#PB_Window_ScreenCentered)
CreateThread(@_zeigeGadget(),0)
Repeat
Select WaitWindowEvent(1)
Case #PB_Event_CloseWindow
End
EndSelect
ForEver
Danke!