Public Sub Initialize (Callback As Object, EventName As String, meters As Boolean)
isMeters = meters ' Did you added this line to the sub too? Additionally to adding the parameter
mEventName = EventName
mCallBack = Callback
#if b4a
DeviceDensity = Density
#else
DeviceDensity = 1
#End If
maxWidth = 90dip
minWidth = 50dip
End Sub