Re: Invoking 'hour-glass' prompt

In article <3392DC48.75A1_at_bnl.gov>, Pat Gordon-Ozgul <gorden_at_bnl.gov> wrote:
>If anyone could supply me with ANY instuctions on how to invoke the
>windows 'hour-glass' prompt while a report is executing, I'd like to
>know! Please email any suggestions. Thanks. :-)
>
>Pat Gorden-Ozgul gorden_at_bnl.gov

Here is some code we use:

    MESSAGE('Working...',NO_ACKNOWLEDGE);     SYNCHRONIZE;
    CLEAR_MESSAGE; --This doesn't occur until control returns to user     SET_APPLICATION_PROPERTY(CURSOR_STYLE,'BUSY');

• Then start a timer to expire (100 milliseconds)
• It will expire, but won't be processed until control returns
• back to your form. Something like the following: DECLARE TIMER_ID TIMER := CREATE_TIMER('HOURGLASS',100,NO_REPEAT);
• When the timer expires, do the following:
  • The first line below was needed to overcome a Windows bug -- SET_APPLICATION_PROPERTY(CURSOR_STYLE,'INSERTION'); SET_APPLICATION_PROPERTY(CURSOR_STYLE,'DEFAULT');