Clarion Community Help

TakeAccepted, VIRTUAL, PROC

The TakeAccepted method processes EVENT:Accepted events for all the controls on the preview window, then returns a value indicating whether window ACCEPT loop processing is complete and should stop. TakeAccepted returns Level:Benign to indicate processing of this event should continue normally; it returns Level:Notify to indicate processing is completed for this event and the ACCEPT loop should CYCLE; it returns Level:Fatal to indicate the event could not be processed and the ACCEPT loop should BREAK.

Implementation:

The TakeEvent method calls the TakeAccepted method. The TakeAccepted method calls the WindowManager.TakeAccepted method, then processes EVENT:Accepted events for all the controls on the preview window, including zoom controls, print button, navigation controls, thumbnail configuration controls, etc.

Return Data Type:     BYTE

Example:

MyWindowManager.TakeEvent PROCEDURE

RVal BYTE(Level:Benign)

I    USHORT,AUTO

 CODE

IF ~FIELD()

 RVal = SELF.TakeWindowEvent()

 IF RVal THEN RETURN RVal.

END

CASE EVENT()

OF EVENT:Accepted;   RVal = SELF.TakeAccepted()

OF EVENT:Rejected;   RVal = SELF.TakeRejected()

OF EVENT:Selected;   RVal = SELF.TakeSelected()

OF EVENT:NewSelection; RVal = SELF.TakeNewSelection()

OF EVENT:Completed;   RVal = SELF.TakeCompleted()

OF EVENT:CloseWindow OROF EVENT:CloseDown

 RVal = SELF.TakeCloseEvent()

END

IF RVal THEN RETURN RVal.

IF FIELD()

 RVal = SELF.TakeFieldEvent()

END

RETURN RVal

See Also:     TakeEvent, WindowManager.TakeEvent