Jonathan,

I did not understand this because I am not dragging anything. Are you saying that drag messages will be sent even if I am not dragging something?

If so than I say HHMMM - didn't know that one....

Thanks

Tom

On Apr 27, 2005, at 3:58 PM, Lynch, Jonathan wrote:

SO if I press the mouseDown I want to move from
btn to btn and see a label for that btn and do some other things.

I believe you can accomplish this with setting the dragdata on mousedown, and using dragenter after that:


On MouseDown
  Set the dragdata to "Yo Mama"
End mousedown

In the group, card, or stack script:

On DragEnter
  If the dragdata = "Yo Mama" then
    Set the label of the target to "Greetings"
  End if
End dragenter

I will play with this approach in a stack, and see if it works. A dragenter message is only sent of the dragdata is not empty.

-----Original Message-----
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Thomas McGrath III
Sent: Wednesday, April 27, 2005 3:48 PM
To: How to use Revolution
Subject: Re: I hate mousedown


Jonathan,

I have a palette of 18 buttons that I want to act upon once a mouse
down has been pressed. SO if I press the mouseDown I want to move from
btn to btn and see a label for that btn and do some other things. But
any messages are sent back to the original control that received the
mouseDown including the mouseUp, mousewithin, mouseenter, mouseleave,
mousestilldown etc. Even the mousemove gets sent.

I had to use a mouseDown with a call to another message and do a 'send
in'. Then I had to do a 'if the mouse is up' and a 'if the mouse is
down' in order to do what I need. But now it only works sporadically.

I just need a Down message that works when the mouse is down and KNOWS
what btn it is over.

I used this script from Eric:
on mouseDown
global theKeys, thecheck
if the short name of the target is among the lines of theKeys then --
if "button" is in the target then
CheckOtherButtons -- ∆
end if
end mouseDown
---------------------------------------
on CheckOtherButtons
global theKeys, thecheck
if the mouse is up then
set the hilite of btn thecheck to false
revspeak "mouse up" && thecheck
put "" into thecheck
exit CheckOtherButtons
end if
if thecheck is not empty then
set the hilite of btn thecheck to false
end if
repeat for each line i in theKeys --with i = 1 to the number of btns
if the mouseLoc is within the rect of btn i then
set the hilite of btn i to true
put i into thecheck
cPreviewKey i
end if
end repeat
send "CheckOtherButtons" to me in 5 milliseconds -- 50
end CheckOtherButtons


On Apr 27, 2005, at 2:55 PM, Lynch, Jonathan wrote:

Is there a particular situation where it is not working?

Thomas J. McGrath III SCS 1000 Killarney Dr. Pittsburgh, PA 15234 412-885-8541

_______________________________________________
use-revolution mailing list
[email protected]
http://lists.runrev.com/mailman/listinfo/use-revolution


_______________________________________________ use-revolution mailing list [email protected] http://lists.runrev.com/mailman/listinfo/use-revolution


Thomas J. McGrath III SCS 1000 Killarney Dr. Pittsburgh, PA 15234 412-885-8541

_______________________________________________
use-revolution mailing list
[email protected]
http://lists.runrev.com/mailman/listinfo/use-revolution

Reply via email to