THAT WAS IT!

> fixed for the next alpha
Thanks, Fred!

Safari 7.0.1 developer console error output:Comtois wrote:I probably forgot to change something, here is what it looks like on my site with the example GadgetOverview. But it is encouraging
http://comtois.developpez.com/tests/spi ... rview.html
Code: Select all
[Error] Failed to load resource: the server responded with a status of 404 (Not Found) (claro.css, line 0)
[Error] Failed to load resource: the server responded with a status of 404 (Not Found) (windows-7.css, line 0)
[Error] TypeError: Attempted to assign to readonly property.
put (put.js, line 64)
spider_CheckBoxGadget (GadgetOverview.html, line 100)
SpiderLaunch (GadgetOverview.html, line 270)
(anonymous function) (GadgetOverview.html, line 358)
_c9 (dojo.js, line 15)
_36 (dojo.js, line 15)
(anonymous function) (dojo.js, line 15)
_37 (dojo.js, line 15)
_7e (dojo.js, line 15)
_f1 (dojo.js, line 15)
_108 (dojo.js, line 15)
No problem.Comtois wrote:That was it, i forgotten to change one line, work fine now
http://comtois.developpez.com/spiderbas ... rview.html
Thank you Danilo.
Is it possible to have a scroll bars on the web page for smaller screen/browser sizes, perhaps use an iframe.Comtois wrote:That was it, i forgotten to change one line, work fine now
http://comtois.developpez.com/spiderbas ... rview.html
Thank you Danilo.
Code: Select all
;
; SpiderBasic example by Danilo
;
; 5. February 2014
; SpiderBasic 1.00 Alpha 3
;
Procedure DesktopWidth()
;
; Returns the width of the browser area
;
!var width;
!require(["dojo/window"], function(win){
! width = win.getBox().w;
!});
!return width;
EndProcedure
Procedure DesktopHeight()
;
; Returns the height of the browser area
;
!var height;
!require(["dojo/window"], function(win){
! height = win.getBox().h;
!});
!return height;
EndProcedure
Procedure OnWindowSize()
SetGadgetText(2,Str(WindowWidth(1)))
SetGadgetText(4,Str(WindowHeight(1)))
EndProcedure
Procedure UpdateDesktopSize()
SetGadgetText(6,Str(DesktopWidth()))
SetGadgetText(8,Str(DesktopHeight()))
EndProcedure
If OpenWindow(1,0,0,200,200,"Desktop Info",#PB_Window_SystemMenu|#PB_Window_SizeGadget)
TextGadget(1, 10,10,100,20,"Window Width: ")
TextGadget(2,120,10, 70,20,Str(WindowWidth(1)))
TextGadget(3, 10,35,100,20,"Window Height: ")
TextGadget(4,120,35, 70,20,Str(WindowHeight(1)))
TextGadget(5, 10,60,100,20,"Desktop Width: ")
TextGadget(6,120,60, 70,20,Str(DesktopWidth()))
TextGadget(7, 10,85,100,20,"Desktop Height:")
TextGadget(8,120,85, 70,20,Str(DesktopHeight()))
ButtonGadget(9,10,110,180,20,"Update Desktop Size")
BindGadgetEvent(9, @UpdateDesktopSize())
BindEvent(#PB_Event_SizeWindow, @OnWindowSize(), 1)
EndIf