Re: waiting for pressed key and reading key
- To: mathgroup at smc.vnet.net
- Subject: [mg87614] Re: [mg87570] waiting for pressed key and reading key
- From: Pratik Desai <pratikd at wolfram.com>
- Date: Mon, 14 Apr 2008 05:45:47 -0400 (EDT)
- References: <200804130732.DAA11505@smc.vnet.net>
On Sun, 13 Apr 2008, Adrian Lupascu wrote:
> Hi everyone,
>
> I am interested to include in a program a part in which the program
> waits until either of two specific keys are pressed, and once this
> happens waiting is over and the one key (ut of the two) which was
> pressed determines the value of a variable. I basically want to use as a
> mean to read user confirmation.
Hello Adrian,
Perhaps this is not what you are exactly looking for but using
CurrentValue might be the way to go, for example
here pressing Command and Shift causes the Disk to change to Circle.
DynamicModule[{x},
Column[{Dynamic@
If[CurrentValue["ShiftKey"] && CurrentValue["CommandKey"],
Style[x = True, White], Style[x = False, White]],
PaneSelector[{True -> Graphics[Circle[]],
False -> Graphics[Disk[]]}, Dynamic[x]]}]]
> I figured out how to do something in this line by using a DynamicModule,
> with an EventHandler that wait for a mouse click. The problem I have
> with that is that I would prefer to use keys and also that
> "MouseClicked" event requires the cursor to be positioned over a certain
> expression.
Seems like CurrentValue["MouseOver"] might also be useful
Dynamic[Graphics[f[],
PlotLabel -> If[CurrentValue["MouseOver"], f = Circle, f = Disk]]]
Sincerely,
Pratik Desai
Wolfram Research
> Any help is appreciated.
>
> Thanks,
> Adrian
>
>
>
>
--
- References:
- waiting for pressed key and reading key
- From: Adrian Lupascu <Adrian.Lupascu@lkb.ens.fr>
- waiting for pressed key and reading key