content: sub init()
      m.top.observeFieldScoped("text", "onTextChanged")
      m.top.iconUri = ""
      m.top.focusedIconUri = ""
      m.top.showFocusFootprint = true
      m.top.minWidth = 0
  end sub
  
  
  
  
  sub onTextChanged()
      addSpaceAfter = true
      minChars = m.top.minChars
      if minChars = invalid then
          minChars = 50
      end if
      while m.top.text.Len() < minChars
          if addSpaceAfter
              m.top.text = m.top.text + Chr(160)
          else
              m.top.text = Chr(160) + m.top.text
          end if
          addSpaceAfter = addSpaceAfter = false
      end while
  end sub