maybe a stupid question: Why isn't purebasic.com displayed, after pressing the button?
This is just a demo code:
Code: Select all
If OpenWindow(0, 200, 200, 800, 840, "")
ButtonGadget(0, 0, 0, 200, 40, "Press")
WebViewGadget(1, 0, 40, 800, 800)
SetGadgetText(1, "http://www.google.com")
EndIf
Repeat
event=WaitWindowEvent()
Select event
Case #PB_Event_Gadget
Select EventGadget()
Case 0
Debug "ok"
SetGadgetText(1, "https://www.purebasic.com/") : Delay(5000)
Debug "ok"
SetGadgetText(1, "http://www.w3schools.com")
EndSelect
EndSelect
Until Event=#PB_Event_CloseWindow