Diane, Here are a few ideas.
Option 1 Put a message in the Pause that says you will break their fingers if they clik on the X. However most HR departments frown on this. Option 2 Give them something to look at that is mesmerizing to look at ... PAUSE 3 USING “Retrieving matching documents…” + CAPTION “ Retrieving Documents ” + ICON INFO + OPTION GAUGE_VISIBLE ON + |GAUGE_COLOR GREEN + |GAUGE_INTERVAL 10 + |MESSAGE_FONT_NAME VERDANA + |MESSAGE_FONT_SIZE 10 + |MESSAGE_FONT_COLOR GREEN Option 3 Create a form that has your message in it. Disable the close button under form properties Give it a componentid of MDI_Pause In your code where you call the PAUSE use EDIT USING MDI_Pause MDI AS "PauseForm" When your process is complete issue CLOSEWINDOW MDI_Pause Option 4 Contact RBTI and request an enhancement request. However if I remember correctly, the PAUSE uses a windows control and we don't have much control over it. I asked this question a couple years back. There may be more ideas but I believe Option 3 to be your best choice at this time (I do still use Option 1 & 2 as necessary). Option 4 is still good but we would need to let RBTI or Razzak chime in on this. Have a good rest of your Memorial Day. Jan -----Original Message----- From: [email protected] To: [email protected] (RBASE-L Mailing List) Date: Mon, 31 May 2010 18:33:54 -0400 (EDT) Subject: [RBASE-L] - Closing Pause 3 Message Box Hi, all, I wonder if anyone might have a solution to a problem I am running into with Pause: I have an application EEP with a Pause 3 statement in it -- PAUSE 3 USING “Retrieving matching documents…” + CAPTION “Retrieving Documents” + ICON INFO (code that takes a minute or two, or maybe even longer to execute) CLS (etc.) If the user decides to click on the “X” on the Pause message box to close the message box, he/she gets the typical Windows message box “End Program – R:BASE Extreme 9.0” with the “End Now” and “Cancel” buttons. If the user clicks “End Now”, R:BASE aborts. If the user clicks “Cancel”, he/she returns to the program but R:BASE no longer works properly – all kinds of weird error messages pop up when the program resumes running. How can I prevent the user from getting the Windows message box in the first place (how can I prevent the user from closing the Pause Message Box)? Thank you in advance... Diane DeMers Sugarloaf Software DeKalb, IL
