Description

Checks for pending events in the Windows event queue and executes them. Returns control as soon as the event queue is empty.

Syntax

Yield()

Remarks

Note: All pending events will be executed. This includes OpenInsight and Windows events. It is good practice to handle process dependent conditions (such as a Close event) after a Yield() call.

Examples

done = FALSE$
Loop
ReadNext ID Else done = TRUE$
Until done
* Allow for an event, such as CLICK
Yield()
* Process ID record
Repeat
  • No labels

1 Comment

  1. Don Bakke

    Per a very old post on the Revelation Software forum, the Yield() subroutine code looks like this:

    subroutine Yield(void)

    declare function Peek_Event
    declare subroutine Run_Event

    loop
    while Peek_Event(AppID, ObjectID, ObjectClass, Event, p1, p2, p3, p4, p5, p6, p7, p8, p9)
        Run_Event(Appid, ObjectID, ObjectClass, Event, p1, p2, p3, p4, p5, p6, p7, p8, p9)
    repeat

    return