Webview

[bishmedia]

Ok simple question (i hope)

I have a webview added to my app with several buttons which makes the webview show different urls.

My question is, when this is run different websites are larger than the webview?
Is there an option where i can always make the url fit the webview width wise???

 

[Erel]

The WebView has a zoom feature which the user can use to zoom in or out. You can also zoom the WebView programmatically.

 

[bishmedia]

The only issue with the zoom is that when the page opens its already too big, you can +zoom but the -zoom is blanked out until you press +zoom!!!

I'd like it to fit to the window as soon as loaded!!!

 

[Erel]

You can zoom out programmatically.

 

[bishmedia]

ok i guess what your saying is, search for the answer in the 'online community'

 

[Erel]

No, I meant that you can call WebView.Zoom(False) after the page is loaded to zoom out the page.

There is no simple way to make the whole page fit. Even if you zoom out it doesn't mean that the user will be able to read the page as the text might be too small.

 

[bishmedia]

Thanks Erel, i will leave as is i think, i just thought it would look more professional if it opened and fitted the window.

Many Thanks

 

[warwound]

You could take a look at WebViewSettings.

It contains many methods and most of them are not (officially) well documentated.
But i'm sure you can use the library to force a webpage to load so that it is scaled to completely fit the WebView, setUseWideViewPort and setLoadWithOverviewMode seems to control the initial loading scale.

android - What do setUseWideViewPort() and setLoadWithOverviewMode() precisely do? - Stack Overflow

Martin.

 

[bishmedia]

How would i instigate one of the above methods, i simply have..

Sub btnDown1_Click
   WebView1.LoadURL("http://www.4barsrest.com")
End Sub

Many thanks

 

[warwound]

Try this example code:

Sub Process_Globals
End Sub

Sub Globals
   Dim WebView1 As WebView
End Sub

Sub Activity_Create(FirstTime As Boolean)
   WebView1.Initialize("")
   Activity.AddView(WebView1, 0, 0, 100%x, 100%y)
   
   '   apply webview settings AFTER the WebView has been added to the layout
   Dim WebViewSettings1 As WebViewSettings
   
   '   possible values are "CLOSE", "FAR" & "MEDIUM"
   '   default is "MEDIUM"
   WebViewSettings1.setDefaultZoom(WebView1, "FAR")
   
   WebViewSettings1.setLoadWithOverviewMode(WebView1, True)
   
   WebViewSettings1.setUseWideViewPort(WebView1, True)
   

   WebView1.LoadUrl("http://www.b4x.com/forum/basic4android-updates-questions/26204-webview.html#post151659")

End Sub

Sub Activity_Resume
End Sub

Sub Activity_Pause (UserClosed As Boolean)
End Sub

That shows the syntax to use.
If you experiment with different values for those three methods you'll see various results - sometimes the settings have no effect though.
A lot seem to depend on the web page that you load and how it is written.
Some pages have fluid HTML layouts that adapt to different sizes, some pages have fixed size layouts that don't adapt to small screens very well.

So try the example code with various different web pages and various different values for the three methods and see what you get.
It might be worth testing on different devices/emulators with different versions of Android as the WebView can behave differently from version to version.

The official documentation for the WebView WebSettings page can be found here: WebSettings | Android Developers, you'll see most of the methods have rather vague names and little documentation.
So a search on Google will likely help you to establish what the various methods do.

Martin.

 

[bishmedia]

I keep getting the following error??

Parsing code.                           Error
Error parsing program.
Error description: Unknown type: webviewsettings
Are you missing a library reference?
Occurred on line: 38
    Dim WebViewSettings1 As WebViewSettings

 

[warwound]

I keep getting the following error??

Parsing code.                           Error
Error parsing program.
Error description: Unknown type: webviewsettings
Are you missing a library reference?
Occurred on line: 38
    Dim WebViewSettings1 As WebViewSettings

Download WebViewSettings from here: http://www.b4x.com/forum/additional...-updates/12929-webviewsettings.html#post72889.

Martin.