IME_HeightChanged not happening

I'm trying to catch a keyboard disappear using IME, but the event never occurs. I've based the code on Erel's tutorial so I'm not sure why it's not happening.

Here are the relevant bits of code:

Code:

  Sub Globals
Dim IME As IME  

Code:

  Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("PatientsL")
IME.Initialize("IME")
IME.AddHeightChangedEvent  

Code:

  Sub IME_HeightChanged(NewHeight As Int, OldHeight As Int)
If NewHeight > OldHeight Then...  

IME_HeightChanged not happening

from B4X Community - Android, iOS, desktop, server and IoT programming tools http://ift.tt/2bHhXSR
via IFTTT