home *** CD-ROM | disk | FTP | other *** search
/ Carousel / CAROUSEL.cdr / mactosh / hc / x_tools1.sit / X-Tools1.1 / card_9890.txt < prev    next >
Text File  |  1988-01-27  |  908b  |  41 lines
  1. -- card: 9890 from stack: in.1
  2. -- bmap block id: 0
  3. -- flags: 0000
  4. -- background id: 3468
  5. -- name: 
  6.  
  7.  
  8. -- part contents for background part 9
  9. ----- text -----
  10. XCMD
  11.  
  12. -- part contents for background part 2
  13. ----- text -----
  14. ImportPict
  15.  
  16. -- part contents for background part 8
  17. ----- text -----
  18. Andy Hertzfeld
  19.  
  20. -- part contents for background part 1
  21. ----- text -----
  22.  
  23. This XCMD imports pictures from resource files by turning PICT resources into new cards in the current stack. A dialog box is presented if no file name is given. A hypercard userlevel of at least 3 must be used.
  24.  
  25. ex. ImportPict
  26.       ImportPict "ScrapBook File"
  27.  
  28. on mouseUp
  29.   put the userLevel into saveLevel
  30.   if the userLevel < 3 then set userLevel to 3 -- "Painting"
  31.   if the userLevel < 3 then exit mouseUp
  32.   ImportPict
  33.   set userLevel to saveLevel
  34. end mouseUp
  35.  
  36.  
  37. -- part contents for background part 4
  38. ----- text -----
  39.  
  40. ImportPict [<filename>]
  41.