Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("Layout")
WebView1.Initialize("WebView1")
Activity.AddView(WebView1, 0, 0, 100%x, 100%y)
ime1.Initialize("IME1")
ime1.AddHeightChangedEvent
WebView1.LoadUrl("https://dlrl.xxxxx.com")
WebView1.JavaScriptEnabled = True
MyWebViewExtras.addWebChromeClient(WebView1, "")
ProgressDialogShow("loading...")
Dim jo As JavaObject = Activity
jo.RunMethodJO("getContext", Null).RunMethodJO("getWindow", Null).RunMethod("setSoftInputMode", _
Array As Object(0x20))
End Sub