home *** CD-ROM | disk | FTP | other *** search
- Newsgroups: comp.sys.mac.programmer
- 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
- From: adler@Informatik.TU-Muenchen.DE (Martin Adler)
- Subject: Spinning Beach Ball/ Watch
- Followup-To: Spinning Beach Ball/ Watch
- Originator: adler@hphalle6g.informatik.tu-muenchen.de
- Sender: news@Informatik.TU-Muenchen.DE (USENET Newssystem)
- Organization: Technische Universitaet Muenchen, Germany
- Date: Wed, 11 Nov 1992 15:07:29 GMT
- Message-ID: <1992Nov11.150729.21445@Informatik.TU-Muenchen.DE>
- Lines: 30
-
-
- You need another resource called "acur" (animated Cursor).
- Tis rsrc cotains first the number of pictures, the actual position, and then the
- IDs of the pictures to be animated.
-
- So, you first have to produce all your cursor pictures with for example all the
- different spinning watch positions. I made something like this with c.a. 60
- pictures with CURS- Pictures with the IDs 128, 129, 130, ......
-
- Now you have to create the "acur" - Resource with ResEdit.
- First fill in the number of CURS you have made.
- The next number you can set to 0. You only need this this number in your program.
-
- Now in your code you have to load the acur-Resource:
-
- If your actuel position-number is greater or eval then number of existing
- animated CURS-Pictures ( This is the first number in the acur-Resource ) then you
- set the actuel position number to 0.
- Then you call
- SetCursor (128+<actuelPositionnumber>);
- Incr(<actuelPositionnumber>);
-
- I hope you understand this. If you want further information I can send you a
- sample code segment in PASCAL. But the src-code of my program is at home and I am
- here in University, sorry.
-
- --- GULPI ---
-
-
- adler@Informatik.TU-Muenchen.DE Martin Adler
-