maxgui : mouse enter inside a textfield

this ok with gadgetaction event. i don't know exactly how to do the same thing with activegadget. Not exatly works as i want too : the user must enter text to see the help (into the status bar).

Strict

Local MyWindow:TGadget=CreateWindow("test", 200,200,320,240)

Local MyField:Tgadget = CreateTextField (10,10,200,20, MyWindow)

ActivateGadget (MyField)

Repeat

  WaitEvent()

	Print CurrentEvent.ToString()
	
  Select EventID()

	  Case EVENT_WINDOWCLOSE
	     End
	
	  Case EVENT_GADGETACTION
	
		Select EventSource()
		
			Case MyField
				SetStatusText MyWindow, "ok"
				
		End Select 
	
   End Select

	If ActiveGadget() = MyField
			SetStatusText MyWindow, "ok2"
	End If
	
Forever