[racket] shift/release shift keys in universe module

OK, I will have to use another gesture.  My goal is to build something like
the "grouping" functionality in PowerPoint/Word/etc.

The vocabulary I have in mind is

"n"                                         - -adds a new square to the
canvas, at the mouse point
mouse-down mouse-up  -- selects the current shape
mouse-down "a"                -- adds the current shape to the current
selection
"g"                                         -- turns the shapes in the
current selection into a single shape
"u"                                         -- ungroups the shapes in the
current selection

Do you see anything problematic there?

--Mitch


On Thu, Mar 14, 2013 at 10:46 PM, Matthias Felleisen
<matthias at ccs.neu.edu>wrote:

>
> No. And what you got is a coincidence.  big-bang wasn't designed with
> these subtleties in mind. Quite the opposite, the original intent was to
> move people on to Racket's real GUI toolbox. It just so happens that people
> use big-bang and universe far beyond the original intent. -- Matthias
>
>
>
> On Mar 14, 2013, at 10:42 PM, Mitchell Wand wrote:
>
> OK, it's quicker to experiment:
>
> On my windows 7 machine in racket 5.3.3, holding the shift key followed by
> a wheel down yields the sequence "shift" "wheel-down" "shift".
>
> So the way to detect shift-click and the like is to look for a button-up
> FOLLOWED by shift.
>
> Is there any better way to do this?
>
> --Mitch
>
>
> On Thu, Mar 14, 2013 at 9:56 PM, Mitchell Wand <wand at ccs.neu.edu> wrote:
>
>> Does releasing a shift key cause a key event in 2htdp/universe ?  I want
>> to distinguish between ordinary mouse click and shift click.  What I'd like
>> is to have a sequence like
>>
>> keyevent:  "shift"  (or "rshift")
>> mouse-event: button-down [or whatever]
>> keyevent: ???    (I release the shift key)
>>
>> I suppose I could experiment to find out, but it's quicker to ask :)
>>
>> --Mitch
>>
>>
>>
>>
>>
>>
> ____________________
>  Racket Users list:
>  http://lists.racket-lang.org/users
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.racket-lang.org/users/archive/attachments/20130314/90abacba/attachment.html>