Sub Globals
Dim WebView1 As WebView
Dim WebViewSettings1 As WebViewSettings
End Sub
Sub Activity_Create(FirstTime As Boolean)
WebView1.Initialize("")
Activity.AddView(WebView1, 0, 0, -1, -1)
WebViewSettings1.setSavePassword(WebView1, True)
WebView1.LoadUrl("http://192.168.1.13/xxxx.eu/index.php")
Log(WebViewSettings1.getSavePassword(WebView1))
End Sub
Sub WebView1_OverrideUrl (Url As String) As Boolean
If Url.Contains("maps.google.at") Then
'jetzt google streetview starten oder etwas anderes...
Dim Intent1 As Intent
Dim Uri As String
Uri="google.streetview:cbll="&48.204428&","&15.619481
Intent1.Initialize(Intent1.ACTION_VIEW, Uri)
StartActivity(Intent1)
End If
End Sub