You can try it here: http://212.111.241.220/tools/test/spider/index.html
And the same implemented with Pb2Web (jQuery): http://212.111.241.220/tools/test/pb2web/index.html
Code: Select all
! $("body").css("overflow", "auto");
! $(document).off("scroll");
Enumeration FormWindow
#hWnd
EndEnumeration
Enumeration FormGadget
#Gadget_Text_Advice
EndEnumeration
Procedure OpenhWnd(x = 0, y = 0, width = 360, height = 2000)
OpenWindow(#hWnd, x, y, width, height, "", #PB_Window_BorderLess)
TextGadget(#Gadget_Text_Advice, 10, 10, 340, 100, "")
EndProcedure
Procedure Main()
Protected a, n = #Gadget_Text_Advice + 1
OpenhWnd()
SetGadgetText(#Gadget_Text_Advice, "Browsers on the iPhone (iOS) have difficulties entering text when the page needs to be scrolled.")
For a = 100 To 2000 Step 50
StringGadget(n, 0, a, 360, 30, Str(n) + ". Try to type some text here..", #PB_String_PlaceHolder)
n + 1
Next
EndProcedure
Main ()