Keyboard input/Keypress check: Difference between revisions
no edit summary
m (→{{header|Phix}}: added syntax colouring the hard way) |
No edit summary |
||
Line 968:
If keypress(32) then k$=" "
</lang>
=={{header|Mathematica}}==
This will create a little panel, once the panel has focus the keys are captured and displayed inside the panel.
<lang Mathematica>i = {};
EventHandler[Panel[Dynamic[i],
ImageSize -> {300, 300}], {"KeyDown" :>
AppendTo[i, CurrentValue["EventKey"]]}]</lang>
=={{header|MiniScript}}==
|