Italian Problema visualizzazione webview

skill27

Member
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

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

Attachments

  • Screenshot_20200920_130641.jpg
    Screenshot_20200920_130641.jpg
    295.5 KB · Views: 152
  • Screenshot_20200920_130815.jpg
    Screenshot_20200920_130815.jpg
    323.4 KB · Views: 172

Sagenut

Expert
Licensed User
Longtime User
Ho visto che c'è la WebViewExtras2 2.20.
Puoi provare quella.
Non avendola mai usata però non so se è la soluzione al tuo problema.
 

skill27

Member
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.
 
Last edited:

MarcoRome

Expert
Licensed User
Longtime User
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

B4X:
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

Member
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

B4X:
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

Expert
Licensed User
Longtime User
Mi dà lo stesso l'errore perché non lo inizializzo
E tu inizializzalo

1. Codice B4A - Main:
B4X:
#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:

1600753951257.png



3. Libreria da utilizzare:
1600754019698.png
 
Top