TakeFocusLoss (a virtual to process loss of focus)

Top  Previous  Next

 

TakeFocusLoss, VIRTUAL

The TakeFocusLoss method determines the appropriate action to take when the EIPManager window loses focus, and calls the TakeCompleted method with the appropriate parameter.

Implementation:

TakeEvent and TakeFieldEvent methods conditionally call the TakeFocusLoss method.

Example:

EIPManager.TakeFieldEvent        PROCEDURE

I UNSIGNED(1)

 CODE

 IF FIELD() = SELF.ListControl THEN RETURN Level:Benign .

 LOOP I = 1 TO RECORDS(SELF.EQ)+1

  ! Optimised to pick up subsequent events from same field

   IF ~SELF.EQ.Control &= NULL AND SELF.EQ.Control.Feq = FIELD()

     SELF.TakeAction(SELF.EQ.Control.TakeEvent(EVENT()))

     RETURN Level:Benign

   END

   GET(SELF.EQ,I)

 END

 ! Code to handle an unknown field

See Also:     TakeCompleted