'Inizialize the JSConsole object.
Public Sub Initialize(Parent As Panel, Module As Object, EventName As String, WebView As WebView, Height As Float)
mParent = Parent
mModule = Module
mEventName = EventName.ToLowerCase
mHeight = Height
mWebView1 = WebView
mWebView1.Initialize("mWV1")
mTextConsole.Initialize("TextConsole")
mTextConsole.TextSize = 10
mTextConsole.Typeface = Typeface.SANS_SERIF
mTextConsole.Color = Colors.DarkGray
mTextConsole.TextColor = Colors.Green
mTextConsole.Gravity = Gravity.LEFT + Gravity.TOP
mTextConsole.Padding = Array As Int (3dip, 23dip, 3dip, 3dip)
mTextConsole.Text = "Ready" & CRLF & CRLF
mParent.AddView(mTextConsole, 0, 100%y-Height, 100%x, Height)
mLabelConsole.Initialize("LabelConsole")
mLabelConsole.TextSize = 12
mLabelConsole.Typeface = Typeface.DEFAULT_BOLD
mLabelConsole.Color = Colors.Blue
mLabelConsole.TextColor = Colors.LightGray
mLabelConsole.Gravity = Gravity.CENTER_HORIZONTAL + Gravity.CENTER_VERTICAL
mLabelConsole.Padding = Array As Int (1dip, 1dip, 1dip, 1dip)
mLabelConsole.Text = "JS CONSOLE"
mParent.AddView(mLabelConsole, 0, 100%y-Height, 100%x, 20dip)