Italian Problema visualizzazione webview

[skill27]

Ho questo problema con una visualizzazione di un sito che sicuramente dovrei inserire chromeclient e Javascript. Siccome vorrei inserire addwebchromeclient ma, come il ragazzo sotto, non compare nei membri di webviewextras, quale può essere il problema? Che ho webviewextras non aggiornato? Ho il 1.42

 

[skill27]

Ecco qui nello specifico. Grazie a chi riuscirà ad aiutarmi

 

[Sagenut]

Ho visto che c'è la WebViewExtras2 2.20.

WebViewExtras

Hi all. WebViewExtras is my latest library. It's a much updated version of JSInterface. WebViewExtras exposes more of the available native Android WebView methods to your B4A application: addJavascriptInterface(webView1 As WebView, interfaceName As String) Add a javascript interface to...

www.b4x.com

Puoi provare quella.
Non avendola mai usata però non so se è la soluzione al tuo problema.

 

[skill27]

Ho visto che c'è la WebViewExtras2 2.20.

Puoi provare quella.
Non avendola mai usata però non so se è la soluzione al tuo problema.

Niente da fare...non è quello che mi serve. Mi serve esattamente capire come risolvere quelle descritto sopra, ovvero perché non posso fare webviewextras.addwebchromeclient poiché mi dice membro sconosciuto.

 

[MarcoRome]

WebViewExtras2 Rel 2.20 la trovi qui: http://b4a.martinpearman.co.uk/webviewextras/WebViewExtras2-v2.20.zip
Le reference le trovi qui: http://b4a.martinpearman.co.uk/webviewextras/WebViewExtras2.html

Dim WebViewExtras1 As WebViewExtras
Dim WebChromeClient1 As DefaultWebChromeClient
WebChromeClient1.Initialize("WebChromeClient1")
WebViewExtras1.SetWebChromeClient(WebChromeClient1)
WebViewExtras1.AddJavascriptInterface(WebView1, "B4A")
WebViewExtras1.JavaScriptEnabled=True
WebView1.Height=100%y
WebView1.Width=100%x
WebView1.LoadUrl("https://www.xxx.yyyy/pos")

 

[skill27]

WebViewExtras2 Rel 2.20 la trovi qui: http://b4a.martinpearman.co.uk/webviewextras/WebViewExtras2-v2.20.zip
Le reference le trovi qui: http://b4a.martinpearman.co.uk/webviewextras/WebViewExtras2.html

Dim WebViewExtras1 As WebViewExtras
Dim WebChromeClient1 As DefaultWebChromeClient
WebChromeClient1.Initialize("WebChromeClient1")
WebViewExtras1.SetWebChromeClient(WebChromeClient1)
WebViewExtras1.AddJavascriptInterface(WebView1, "B4A")
WebViewExtras1.JavaScriptEnabled=True
WebView1.Height=100%y
WebView1.Width=100%x
WebView1.LoadUrl("https://www.xxx.yyyy/pos")

Grazie mille, svolgendo quello rappresentato però mi da errore: object should first be initialized (Webviewextras). Come dovrei inizializzare?

 

[MarcoRome]

Grazie mille, svolgendo quello rappresentato però mi da errore: object should first be initialized (Webviewextras). Come dovrei inizializzare?

Dim WebViewExtras1 As WebViewExtras

 

[skill27]

Dim WebViewExtras1 As WebViewExtras

Mi dà lo stesso l'errore perché non lo inizializzo

 

[MarcoRome]

Mi dà lo stesso l'errore perché non lo inizializzo

E tu inizializzalo

1. Codice B4A - Main:

#Region Module Attributes
    #FullScreen: False
    #IncludeTitle: True
    #ApplicationLabel: WebView Demo
    #VersionCode: 1
    #VersionName:
    #SupportedOrientations: unspecified
    #CanInstallToExternalStorage: False
#End Region

    '    WebViewExtras demo Activity module
Sub Process_Globals
    'These global variables will be declared once when the application starts.
    'These variables can be accessed from all modules.
End Sub

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.
    Dim WebViewExtras1 As WebViewExtras
    Dim WebView1 As WebView
    
End Sub

Sub Activity_Create(FirstTime As Boolean)
    Activity.LoadLayout("layoutMain")
    
    WebViewExtras1.Initialize(WebView1)
 
    Dim WebChromeClient1 As DefaultWebChromeClient
    WebChromeClient1.Initialize("WebChromeClient1")
    WebViewExtras1.SetWebChromeClient(WebChromeClient1)
    WebViewExtras1.AddJavascriptInterface(WebView1, "B4A")
    WebViewExtras1.JavaScriptEnabled=True
    WebView1.Height=100%y
    WebView1.Width=100%x
    WebView1.LoadUrl("https://google.com/")
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub

2. Layout con una WebView:

3. Libreria da utilizzare: