home *** CD-ROM | disk | FTP | other *** search
- /* brings TextPlus to front (started from Preview) */
- options results
-
- IF (SHOW('P', 'TextPlus')) THEN DO
- ADDRESS 'TextPlus' 'ScreenToFront'
- ADDRESS 'TextPlus' 'WindowToFront'
- ADDRESS 'TextPlus' 'GetName'
- ADDRESS 'TextPlus' 'Activate' result
- END
-