home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #26 / NN_1992_26.iso / spool / comp / sys / mac / programm / 18270 < prev    next >
Encoding:
Text File  |  1992-11-11  |  1.7 KB  |  43 lines

  1. Newsgroups: comp.sys.mac.programmer
  2. Path: sparky!uunet!zaphod.mps.ohio-state.edu!cs.utexas.edu!qt.cs.utexas.edu!yale.edu!ira.uka.de!math.fu-berlin.de!informatik.tu-muenchen.de!adler
  3. From: adler@Informatik.TU-Muenchen.DE (Martin Adler)
  4. Subject: Spinning Beach Ball/ Watch
  5. Followup-To: Spinning Beach Ball/ Watch
  6. Originator: adler@hphalle6g.informatik.tu-muenchen.de
  7. Sender: news@Informatik.TU-Muenchen.DE (USENET Newssystem)
  8. Organization: Technische Universitaet Muenchen, Germany
  9. Date: Wed, 11 Nov 1992 15:07:29 GMT
  10. Message-ID: <1992Nov11.150729.21445@Informatik.TU-Muenchen.DE>
  11. Lines: 30
  12.  
  13.  
  14. You need another resource called "acur" (animated Cursor).
  15. Tis rsrc cotains first the number of pictures, the actual position, and then the
  16. IDs of the pictures to be animated.
  17.  
  18. So, you first have to produce all your cursor pictures with for example all the
  19. different spinning watch positions. I made something like this with c.a. 60
  20. pictures with CURS- Pictures with the IDs 128, 129, 130, ......
  21.  
  22. Now you have to create the "acur" - Resource with ResEdit.
  23. First fill in the number of CURS you have made.
  24. The next number you can set to 0. You only need this this number in your program.
  25.  
  26. Now in your code you have to load the acur-Resource: 
  27.  
  28. If your actuel position-number is greater or eval then number of existing
  29. animated CURS-Pictures ( This is the first number in the acur-Resource ) then you
  30. set the actuel position number to 0.
  31. Then you call
  32.     SetCursor (128+<actuelPositionnumber>);
  33.     Incr(<actuelPositionnumber>);
  34.  
  35. I hope you understand this. If you want further information I can send you a
  36. sample code segment in PASCAL. But the src-code of my program is at home and I am
  37. here in University, sorry.
  38.  
  39.         --- GULPI ---
  40.  
  41.  
  42. adler@Informatik.TU-Muenchen.DE                Martin Adler
  43.