home *** CD-ROM | disk | FTP | other *** search
- Xref: sparky comp.sys.mac.hypercard:2859 comp.sys.mac.misc:13671 comp.sys.mac.apps:12326
- Path: sparky!uunet!decwrl!oracle!unrepliable!bounce
- Newsgroups: comp.sys.mac.hypercard,comp.sys.mac.misc,comp.sys.mac.apps
- From: cmi@oracle.uucp (Eileen Riley)
- Subject: Re: Supercard: Dragging objects in Browse mode
- Message-ID: <1992Jul22.203923.1143@oracle.us.oracle.com>
- Sender: usenet@oracle.us.oracle.com (Oracle News Poster)
- Nntp-Posting-Host: mailseq.us.oracle.com
- Organization: Oracle Corporation, Redwood Shores CA
- References: <1992Jul21.143452.12628@news.cs.brandeis.edu>
- Date: Wed, 22 Jul 1992 20:39:23 GMT
- X-Disclaimer: This message was written by an unauthenticated user
- at Oracle Corporation. The opinions expressed are those
- of the user and not necessarily those of Oracle.
- Lines: 14
-
- Try this:
-
- on mouseDown
- put the mouseLoc into theMLoc
- set the loc of cd fld myFld to theMLoc -- this will center the object on the mouseLoc
- -- to move multiple objects along with the first one...
- -- simply figure the offset of the subsequent objects to the 'root' object
- -- i.e., moving a btn with a field:
- put item 2 of theMLoc-10 into xLoc
- set the loc of cd btn secondBtn to (xLoc,item 1 of theMLoc)
-
- -- you get the idea
-
- end mouseDown
-