Public Sub Initialize (Callback As Object, EventName As String)
mEventName = EventName
mCallBack = Callback
pnlMark.Initialize("pnl")
lblMain.Initialize("lab")
End Sub
Public Sub DesignerCreateView (Base As Object, Lbl As Label, Props As Map)
mBase = Base
Tag = mBase.Tag
mBase.Tag = Me
//code to get data from designer view goes here (generic color variables etc)
lblMain = Lbl ' acquire text properties from Designer lbl - Could this be the problem ?
mask.AddView(lblMain,0,0,0,0) ' just added the view here label size is resized in Alignlabels to fill mbase - it covers maximum view of mbase
mask.AddView(pnlMark,0,0,0,0) ' just added the view here panel size is resized in Alignlabels - it covers only a tiny part of mbase
Alignlabels
End Sub
Private Sub Alignlabels
// removed code here for readability ( align labels etc and set padding)
End Sub
//removed code to handle properties and methods (generic stuff)
Private Sub Lab_Click
Log("Not firing")
End Sub
Private Sub Pnl_Click
Log("Works fine")
End Sub