home *** CD-ROM | disk | FTP | other *** search
/ Borland Programmer's Resource / Borland_Programmers_Resource_CD_1995.iso / utils / catch / manip.wbf < prev    next >
Encoding:
Text File  |  1995-05-19  |  522 b   |  23 lines
  1. ;Catch example file
  2. ;Copyright Sean Batten
  3.  
  4. ;This file shows how windows can be manipulated
  5. Exists("Clock")
  6. if @NOEXISTS Run ("Clock","")
  7. IsIcon("Clock")
  8. if @ICON Restore ("Clock")
  9.  
  10. ;Now lets have some fun
  11. ok ("Minimise","Click to minimse Clock")
  12. Min ("Clock")
  13.  
  14. ok ("Maximize","Click to maximize Clock")
  15. Max ("Clock")
  16.  
  17. ok ("Normal", "Click to restore clock to normal")
  18. Restore ("Clock")
  19.  
  20. ;Now lets play with the size!!!!!!!!!!
  21. ok ("Move", "Click to move and resize Clock")
  22. move ("Clock",1,1,150,300)
  23.