Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: utzoo!mnetor!uunet!husc6!mit-eddie!ll-xn!ames!sdcsvax!net1!graifer
From: graifer@net1.ucsd.edu (Dan Graifer)
Newsgroups: comp.sys.mac
Subject: Re: More specific Find in HyperCard
Message-ID: <4166@sdcsvax.UCSD.EDU>
Date: Sat, 24-Oct-87 18:14:06 EST
Article-I.D.: sdcsvax.4166
Posted: Sat Oct 24 18:14:06 1987
Date-Received: Mon, 26-Oct-87 04:45:08 EST
References: <9380@ut-sally.UUCP>
Sender: Unknown@sdcsvax.UCSD.EDU
Reply-To: graifer@net1.UUCP (Dan Graifer)
Organization: UCSD Network Operations Group
Lines: 50

In article <9380@ut-sally.UUCP> brian@ut-sally.UUCP (Brian H. Powell) writes:
>
>     I am setting up a HyperCard stack to contain my favorite database:  my
>record collection.  I want to set up different find buttons for finding
>composer, finding title, etc.  I want the script for each button to bring up
>the message window with:
>
>	find "" in field "composer"
>or	find "" in field "title"
>
>where the cursor is in between the first double-quotes.
>
>     Seems to me that I want to use "put into message" or some variation.  Is
>this correct?
>
>	Problem 1)  How do I "put" a double-quote?
>	Problem 2)  How do I position the cursor?
>
>Thanks.
>
>Brian


I tried this:

on mouseUp
  put "Find" && quote & quote && "in Field Composer" into msg
  put rect of msg into mloc
  put (item 1 of mloc) + 50 into h
  put round(((item 2 of mloc) + (item 4 of mloc))/2) into v
  put " (" & h &"," & v & ")" after msg
  click at h,v
end mouseUp

but it doesn't work for one reason:  The click is not intercepted by the 
Message window, the card containing the button gets it instead.  I can
find no way to send a message to the Message window.

How about something like:
on mouseUp
  ask "Find what?"
  if it isnt empty then
    find it in field composer
  end if
end mouseUp

Good luck:
                              Dan Graifer
                              graifer@net1.UCSD.EDU
Disclaimer: Nobody ever listens to me anyways; Why should they start now?