Q102456: How to Activate Buttons While a Browse Window Is Open

Article: Q102456
Product(s): Microsoft Fox Miscellaneous Products
Version(s): MACINTOSH:2.01
Operating System(s): 
Keyword(s): 
Last Modified: 23-OCT-1999

-------------------------------------------------------------------------------
The information in this article applies to:

- Microsoft FoxBASE+ for Macintosh, version 2.01 
-------------------------------------------------------------------------------

The code example below demonstrates one method of having buttons
active while a Browse window is open. When the following program
example is executed, a Browse window with two buttons below it will
appear. An alert box will be displayed when either button is chosen.

WARNING: ANY USE BY YOU OF THE CODE PROVIDED IN THIS ARTICLE IS AT
YOUR OWN RISK. Microsoft provides this code "as is" without warranty
of any kind, either expressed or implied, including but not limited to
the implied warranties of merchantability and/or fitness for a
particular purpose.

     DO WHILE .t.

     SCREEN 1 TYPE 2 HEADING " " AT 250,114 SIZE 47,100 PIXELS ;
       FONT "Geneva",12 TOP
     @ PIXELS 27,32 SAY "Mark" FONT "Geneva",270

     SCREEN 2 TYPE 2 HEADING " " AT 250,282 SIZE 47,100 PIXELS ;
       FONT "Geneva",12 TOP
     @ PIXELS 27,22 SAY "Unmark" FONT "Geneva",270

     SCREEN 4 TYPE 2 AT -20,1 SIZE 1,1 PIXELS TOP
     BROWSE AT 50,40 SIZE 150,400 SAVE

     IF SYS(1035)='1' THEN
       ALERT NOTE 1 "You marked it!"
     ELSE
       IF SYS(1035)='2' THEN
         ALERT NOTE 1 "You unmarked it!"
       ELSE
         SCREEN 4 OFF
         SCREEN 4 DELETE
        EXIT
       ENDIF
     ENDIF
     ENDDO

     SCREEN 1 DELETE
     SCREEN 2 DELETE

Additional query words: 2.01 example screen button browse

======================================================================
Keywords          :  
Technology        : kbHWMAC kbOSMAC kbAudDeveloper kbFoxproSearch kbFoxBASE201Mac kbFoxBASESearch
Version           : MACINTOSH:2.01

=============================================================================

THE INFORMATION PROVIDED IN THE MICROSOFT KNOWLEDGE BASE IS PROVIDED "AS IS" WITHOUT WARRANTY OF ANY KIND. MICROSOFT DISCLAIMS ALL WARRANTIES, EITHER EXPRESS OR IMPLIED, INCLUDING THE WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT SHALL MICROSOFT CORPORATION OR ITS SUPPLIERS BE LIABLE FOR ANY DAMAGES WHATSOEVER INCLUDING DIRECT, INDIRECT, INCIDENTAL, CONSEQUENTIAL, LOSS OF BUSINESS PROFITS OR SPECIAL DAMAGES, EVEN IF MICROSOFT CORPORATION OR ITS SUPPLIERS HAVE BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. SOME STATES DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES SO THE FOREGOING LIMITATION MAY NOT APPLY.

Copyright Microsoft Corporation 1986-2002.