Public Sub Initialize(Module As Object, EventName As String)
mModule = Module
mEventName = EventName
End Sub
Public Sub AddToParent(Parent As Panel, Left As Int, Top As Int, Width As Int, Height As Int, Text As String)
myButton.Initialize("myButton")
Parent.AddView(myButton, Left, Top, Width, Height)
myButton.Text = Text
End Sub
Public Sub DesignerCreateView(base As Panel, lbl As Label, props As Map)
AddToParent(base, 0, 0, base.Width, base.Height, lbl.Text)
End Sub