home *** CD-ROM | disk | FTP | other *** search
/ Enigma Amiga Life 109 / EnigmaAmiga109CD.iso / software / utilities / t.h.e. / rexx / delete.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1999-11-06  |  326 b   |  16 lines
  1. /*
  2.    $VER: Delete.rexx 1.1 (06.11.99) Copyright (c) Nils Görs & Luca Danelon.
  3.  
  4.    deletes selected icon(s). I recommend to install script as
  5.    hotkey placed on the [DEL] button.
  6. */
  7.  
  8. options results
  9.  
  10. ADDRESS WORKBENCH
  11.  
  12. GETATTR OBJECT WINDOWS.ACTIVE
  13. activewin = result
  14.  
  15. MENU WINDOW '"' || activewin || '"' INVOKE ICONS.DELETE
  16.