5

Here's an attempt at something like this: Dynamic@Row@{$sym, " = ", Symbol@$sym} Unprotect@FE`CacheTemplateAndUsage; FE`CacheTemplateAndUsage[sym_String] /; Context@arg == "Global`" := ( $sym = sym; MathLink`CallFrontEnd@ FrontEnd`CacheTemplateAndUsagePacket[FrontEnd`InputNotebook[], sym, Null] ) The symbol name and its value is ...


3

Here is a very quick and dirty solution which takes advantage of the new molecule editor just recently added in 12.2 MoleculeGraph[MoleculeDraw[]] To make a graph, you can simply make a "molecule" where all of the atoms are vertices and all of the bonds are edges. And then use the built in MoleculeGraph function to convert it into a graph. Here's ...


2

Your Manipulate's body (first argument) depends on x, y and dir. If any of them changes the whole body is reevaluated and rendered which means the EventHandler after the arrow key press is a new EventHandler, Graphics is also new so it is not surprising that the selection is lost and not restored sometimes. You can avoid this by making sure that only the ...


2

Please send a bug report to Wolfram Research (support@wolfram.com). Until you get a patch for your Mathematica version you could the following code ( I only tested it on Windows, but it should work on Mac and Linux, too, I think ): Manipulate[ EventHandler[ Grid[{{Pane[#, Alignment -> Center, ImageSize -> 222]& @ ...


Only top voted, non community-wiki answers of a minimum length are eligible