home *** CD-ROM | disk | FTP | other *** search
/ World of A1200 / World_Of_A1200.iso / programs / text / tpp / rexx / tpptofront.sd < prev    next >
Text File  |  1995-02-27  |  271b  |  11 lines

  1. /* brings TextPlus to front (started from ShowDVI) */
  2. options results
  3.  
  4. IF (SHOW('P', 'TextPlus')) THEN DO
  5.     ADDRESS 'TextPlus' 'ScreenToFront'
  6.     ADDRESS 'TextPlus' 'GetName'
  7.     ADDRESS 'TextPlus' 'Activate' result
  8.     END
  9. ELSE okay1 "Kein TextPlus im Hintergrund!"
  10.  
  11.