Dynamic Linkage of LocatorPane and InputFieldQuestion about collections of custom GUI controls for MathematicaInterdependent controls in ManipulateDynamically updating linked Manipulate variablesLocatorPane, Dynamic and deleting locatorsHow can I effectively performance-profile Dynamics?Restrict Sensitivity of Locators in LocatorPane“Masking” an InputFieldGUI and Dynamic update problemsInteracting Dynamic Components within LocatorPanePuzzled with InputFieldDynamic and TabView mayhemHow to create Dynamic InputField Grid for matrix variable?LocatorPane with transformed coordinates

When Schnorr signatures are part of Bitcoin will it be possible validate each block with only one signature validation?

Signed and unsigned numbers

Can't make sense of a paragraph from Lovecraft

NASA's RS-25 Engines

Why restrict private health insurance?

What is Tony Stark injecting into himself in Iron Man 3?

How do we create new idioms and use them in a novel?

Does a difference of tense count as a difference of meaning in a minimal pair?

Why does cron require MTA for logging?

Plausibility of Mushroom Buildings

Can we track matter through time by looking at different depths in space?

School performs periodic password audits. Is my password compromised?

How is it possible to drive VGA displays at such high pixel clock frequencies?

What is this diamond of every day?

Should I take out a loan for a friend to invest on my behalf?

Which classes are needed to have access to every spell in the PHB?

What is the generally accepted pronunciation of “topoi”?

How many characters using PHB rules does it take to be able to have access to any PHB spell at the start of an adventuring day?

The meaning of ‘otherwise’

After `ssh` without `-X` to a machine, is it possible to change `$DISPLAY` to make it work like `ssh -X`?

What do you call someone who likes to pick fights?

How do electrons receive energy when a body is heated?

Are all players supposed to be able to see each others' character sheets?

Are small insurances worth it?



Dynamic Linkage of LocatorPane and InputField


Question about collections of custom GUI controls for MathematicaInterdependent controls in ManipulateDynamically updating linked Manipulate variablesLocatorPane, Dynamic and deleting locatorsHow can I effectively performance-profile Dynamics?Restrict Sensitivity of Locators in LocatorPane“Masking” an InputFieldGUI and Dynamic update problemsInteracting Dynamic Components within LocatorPanePuzzled with InputFieldDynamic and TabView mayhemHow to create Dynamic InputField Grid for matrix variable?LocatorPane with transformed coordinates













3












$begingroup$


How do I get the InputField to coordinate with the LocatorPane so that a change in each control changes the other to be in agreement? It would be nice if the function was self-contained and was dynamically linked to a second similar control where the variable is radians. The angle control is based on this (see Applications). Related links do not address or solve this particular issue; links such as this this, and this



 fDeg[Dynamic[angleDeg_]] := 
DynamicModule[p, angleRad, angleCalc, dtr = Degree,

angleCalc[newp_,
oldp_] := (angleRad =
angleRad + ArcCos[newp.oldp] Sign[Cross[newp].(newp - oldp)];
If[0 < angleRad, angleRad = Mod[angleRad, +2*Pi]];
If[0 > angleRad, angleRad = Mod[angleRad, -2*Pi]];
angleDeg = angleRad/dtr;
f[angleDeg];
p = Cos[angleRad], Sin[angleRad]);

angleRad = angleDeg*dtr;
p = Cos[angleRad], Sin[angleRad];

LocatorPane[Dynamic[p, (angleCalc @@ Normalize /@ #, p) &],
Dynamic@Show[
Graphics[Circle[], Arrowheads[0.15],
Arrow[Dynamic[0, 0, p]], ImageSize -> Tiny],
Graphics[Dynamic[Text[
NumberForm[angleDeg, 3, 2], 0, 0]]]],
Appearance -> None]];

aDeg = 45;

Column[
"Degrees:",
fDeg[Dynamic[aDeg]],
"aDeg: ",
InputField[Dynamic[aDeg],
FieldSize -> 6]
, Alignment -> Center]









share|improve this question









$endgroup$
















    3












    $begingroup$


    How do I get the InputField to coordinate with the LocatorPane so that a change in each control changes the other to be in agreement? It would be nice if the function was self-contained and was dynamically linked to a second similar control where the variable is radians. The angle control is based on this (see Applications). Related links do not address or solve this particular issue; links such as this this, and this



     fDeg[Dynamic[angleDeg_]] := 
    DynamicModule[p, angleRad, angleCalc, dtr = Degree,

    angleCalc[newp_,
    oldp_] := (angleRad =
    angleRad + ArcCos[newp.oldp] Sign[Cross[newp].(newp - oldp)];
    If[0 < angleRad, angleRad = Mod[angleRad, +2*Pi]];
    If[0 > angleRad, angleRad = Mod[angleRad, -2*Pi]];
    angleDeg = angleRad/dtr;
    f[angleDeg];
    p = Cos[angleRad], Sin[angleRad]);

    angleRad = angleDeg*dtr;
    p = Cos[angleRad], Sin[angleRad];

    LocatorPane[Dynamic[p, (angleCalc @@ Normalize /@ #, p) &],
    Dynamic@Show[
    Graphics[Circle[], Arrowheads[0.15],
    Arrow[Dynamic[0, 0, p]], ImageSize -> Tiny],
    Graphics[Dynamic[Text[
    NumberForm[angleDeg, 3, 2], 0, 0]]]],
    Appearance -> None]];

    aDeg = 45;

    Column[
    "Degrees:",
    fDeg[Dynamic[aDeg]],
    "aDeg: ",
    InputField[Dynamic[aDeg],
    FieldSize -> 6]
    , Alignment -> Center]









    share|improve this question









    $endgroup$














      3












      3








      3


      1



      $begingroup$


      How do I get the InputField to coordinate with the LocatorPane so that a change in each control changes the other to be in agreement? It would be nice if the function was self-contained and was dynamically linked to a second similar control where the variable is radians. The angle control is based on this (see Applications). Related links do not address or solve this particular issue; links such as this this, and this



       fDeg[Dynamic[angleDeg_]] := 
      DynamicModule[p, angleRad, angleCalc, dtr = Degree,

      angleCalc[newp_,
      oldp_] := (angleRad =
      angleRad + ArcCos[newp.oldp] Sign[Cross[newp].(newp - oldp)];
      If[0 < angleRad, angleRad = Mod[angleRad, +2*Pi]];
      If[0 > angleRad, angleRad = Mod[angleRad, -2*Pi]];
      angleDeg = angleRad/dtr;
      f[angleDeg];
      p = Cos[angleRad], Sin[angleRad]);

      angleRad = angleDeg*dtr;
      p = Cos[angleRad], Sin[angleRad];

      LocatorPane[Dynamic[p, (angleCalc @@ Normalize /@ #, p) &],
      Dynamic@Show[
      Graphics[Circle[], Arrowheads[0.15],
      Arrow[Dynamic[0, 0, p]], ImageSize -> Tiny],
      Graphics[Dynamic[Text[
      NumberForm[angleDeg, 3, 2], 0, 0]]]],
      Appearance -> None]];

      aDeg = 45;

      Column[
      "Degrees:",
      fDeg[Dynamic[aDeg]],
      "aDeg: ",
      InputField[Dynamic[aDeg],
      FieldSize -> 6]
      , Alignment -> Center]









      share|improve this question









      $endgroup$




      How do I get the InputField to coordinate with the LocatorPane so that a change in each control changes the other to be in agreement? It would be nice if the function was self-contained and was dynamically linked to a second similar control where the variable is radians. The angle control is based on this (see Applications). Related links do not address or solve this particular issue; links such as this this, and this



       fDeg[Dynamic[angleDeg_]] := 
      DynamicModule[p, angleRad, angleCalc, dtr = Degree,

      angleCalc[newp_,
      oldp_] := (angleRad =
      angleRad + ArcCos[newp.oldp] Sign[Cross[newp].(newp - oldp)];
      If[0 < angleRad, angleRad = Mod[angleRad, +2*Pi]];
      If[0 > angleRad, angleRad = Mod[angleRad, -2*Pi]];
      angleDeg = angleRad/dtr;
      f[angleDeg];
      p = Cos[angleRad], Sin[angleRad]);

      angleRad = angleDeg*dtr;
      p = Cos[angleRad], Sin[angleRad];

      LocatorPane[Dynamic[p, (angleCalc @@ Normalize /@ #, p) &],
      Dynamic@Show[
      Graphics[Circle[], Arrowheads[0.15],
      Arrow[Dynamic[0, 0, p]], ImageSize -> Tiny],
      Graphics[Dynamic[Text[
      NumberForm[angleDeg, 3, 2], 0, 0]]]],
      Appearance -> None]];

      aDeg = 45;

      Column[
      "Degrees:",
      fDeg[Dynamic[aDeg]],
      "aDeg: ",
      InputField[Dynamic[aDeg],
      FieldSize -> 6]
      , Alignment -> Center]






      dynamic gui-construction interactive






      share|improve this question













      share|improve this question











      share|improve this question




      share|improve this question










      asked 3 hours ago









      kmutinykmutiny

      213




      213




















          1 Answer
          1






          active

          oldest

          votes


















          3












          $begingroup$

          Consider the following refactoring of your code



          First, the locator pane is used to set a point location constrained on a circle with unit radius (this part borrowed heavily from an example in the documentation for LocatorPane). A degree value is then calculated from the coordinates of tha tpoint.



          Secondly, the input field is used to read in a degree value, which is then used to update the position of the dynamic point pt using the second argument of Dynamic.



          DynamicModule[
          pt = 0, 1.,
          Column[
          "Degrees:", Dynamic[(ArcTan @@ pt)/Degree],
          LocatorPane[
          Dynamic[pt],
          Graphics[
          Circle[],
          PointSize[Large],
          Dynamic[Arrow[0, 0, pt/Norm[pt]]]
          ],
          Appearance -> None
          ],
          InputField[
          Dynamic[(ArcTan @@ pt)/Degree, (pt = N@Cos[#1 Degree], Sin[#1 Degree]) &],
          FieldSize -> Tiny
          ]
          , Alignment -> Center
          ]
          ]


          This keeps both fields in sync with each other:



          animation shows the locator and input field working together






          share|improve this answer









          $endgroup$












            Your Answer





            StackExchange.ifUsing("editor", function ()
            return StackExchange.using("mathjaxEditing", function ()
            StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix)
            StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["$", "$"], ["\\(","\\)"]]);
            );
            );
            , "mathjax-editing");

            StackExchange.ready(function()
            var channelOptions =
            tags: "".split(" "),
            id: "387"
            ;
            initTagRenderer("".split(" "), "".split(" "), channelOptions);

            StackExchange.using("externalEditor", function()
            // Have to fire editor after snippets, if snippets enabled
            if (StackExchange.settings.snippets.snippetsEnabled)
            StackExchange.using("snippets", function()
            createEditor();
            );

            else
            createEditor();

            );

            function createEditor()
            StackExchange.prepareEditor(
            heartbeatType: 'answer',
            autoActivateHeartbeat: false,
            convertImagesToLinks: false,
            noModals: true,
            showLowRepImageUploadWarning: true,
            reputationToPostImages: null,
            bindNavPrevention: true,
            postfix: "",
            imageUploader:
            brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
            contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
            allowUrls: true
            ,
            onDemand: true,
            discardSelector: ".discard-answer"
            ,immediatelyShowMarkdownHelp:true
            );



            );













            draft saved

            draft discarded


















            StackExchange.ready(
            function ()
            StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f193000%2fdynamic-linkage-of-locatorpane-and-inputfield%23new-answer', 'question_page');

            );

            Post as a guest















            Required, but never shown

























            1 Answer
            1






            active

            oldest

            votes








            1 Answer
            1






            active

            oldest

            votes









            active

            oldest

            votes






            active

            oldest

            votes









            3












            $begingroup$

            Consider the following refactoring of your code



            First, the locator pane is used to set a point location constrained on a circle with unit radius (this part borrowed heavily from an example in the documentation for LocatorPane). A degree value is then calculated from the coordinates of tha tpoint.



            Secondly, the input field is used to read in a degree value, which is then used to update the position of the dynamic point pt using the second argument of Dynamic.



            DynamicModule[
            pt = 0, 1.,
            Column[
            "Degrees:", Dynamic[(ArcTan @@ pt)/Degree],
            LocatorPane[
            Dynamic[pt],
            Graphics[
            Circle[],
            PointSize[Large],
            Dynamic[Arrow[0, 0, pt/Norm[pt]]]
            ],
            Appearance -> None
            ],
            InputField[
            Dynamic[(ArcTan @@ pt)/Degree, (pt = N@Cos[#1 Degree], Sin[#1 Degree]) &],
            FieldSize -> Tiny
            ]
            , Alignment -> Center
            ]
            ]


            This keeps both fields in sync with each other:



            animation shows the locator and input field working together






            share|improve this answer









            $endgroup$

















              3












              $begingroup$

              Consider the following refactoring of your code



              First, the locator pane is used to set a point location constrained on a circle with unit radius (this part borrowed heavily from an example in the documentation for LocatorPane). A degree value is then calculated from the coordinates of tha tpoint.



              Secondly, the input field is used to read in a degree value, which is then used to update the position of the dynamic point pt using the second argument of Dynamic.



              DynamicModule[
              pt = 0, 1.,
              Column[
              "Degrees:", Dynamic[(ArcTan @@ pt)/Degree],
              LocatorPane[
              Dynamic[pt],
              Graphics[
              Circle[],
              PointSize[Large],
              Dynamic[Arrow[0, 0, pt/Norm[pt]]]
              ],
              Appearance -> None
              ],
              InputField[
              Dynamic[(ArcTan @@ pt)/Degree, (pt = N@Cos[#1 Degree], Sin[#1 Degree]) &],
              FieldSize -> Tiny
              ]
              , Alignment -> Center
              ]
              ]


              This keeps both fields in sync with each other:



              animation shows the locator and input field working together






              share|improve this answer









              $endgroup$















                3












                3








                3





                $begingroup$

                Consider the following refactoring of your code



                First, the locator pane is used to set a point location constrained on a circle with unit radius (this part borrowed heavily from an example in the documentation for LocatorPane). A degree value is then calculated from the coordinates of tha tpoint.



                Secondly, the input field is used to read in a degree value, which is then used to update the position of the dynamic point pt using the second argument of Dynamic.



                DynamicModule[
                pt = 0, 1.,
                Column[
                "Degrees:", Dynamic[(ArcTan @@ pt)/Degree],
                LocatorPane[
                Dynamic[pt],
                Graphics[
                Circle[],
                PointSize[Large],
                Dynamic[Arrow[0, 0, pt/Norm[pt]]]
                ],
                Appearance -> None
                ],
                InputField[
                Dynamic[(ArcTan @@ pt)/Degree, (pt = N@Cos[#1 Degree], Sin[#1 Degree]) &],
                FieldSize -> Tiny
                ]
                , Alignment -> Center
                ]
                ]


                This keeps both fields in sync with each other:



                animation shows the locator and input field working together






                share|improve this answer









                $endgroup$



                Consider the following refactoring of your code



                First, the locator pane is used to set a point location constrained on a circle with unit radius (this part borrowed heavily from an example in the documentation for LocatorPane). A degree value is then calculated from the coordinates of tha tpoint.



                Secondly, the input field is used to read in a degree value, which is then used to update the position of the dynamic point pt using the second argument of Dynamic.



                DynamicModule[
                pt = 0, 1.,
                Column[
                "Degrees:", Dynamic[(ArcTan @@ pt)/Degree],
                LocatorPane[
                Dynamic[pt],
                Graphics[
                Circle[],
                PointSize[Large],
                Dynamic[Arrow[0, 0, pt/Norm[pt]]]
                ],
                Appearance -> None
                ],
                InputField[
                Dynamic[(ArcTan @@ pt)/Degree, (pt = N@Cos[#1 Degree], Sin[#1 Degree]) &],
                FieldSize -> Tiny
                ]
                , Alignment -> Center
                ]
                ]


                This keeps both fields in sync with each other:



                animation shows the locator and input field working together







                share|improve this answer












                share|improve this answer



                share|improve this answer










                answered 2 hours ago









                MarcoBMarcoB

                37.4k556113




                37.4k556113



























                    draft saved

                    draft discarded
















































                    Thanks for contributing an answer to Mathematica Stack Exchange!


                    • Please be sure to answer the question. Provide details and share your research!

                    But avoid


                    • Asking for help, clarification, or responding to other answers.

                    • Making statements based on opinion; back them up with references or personal experience.

                    Use MathJax to format equations. MathJax reference.


                    To learn more, see our tips on writing great answers.




                    draft saved


                    draft discarded














                    StackExchange.ready(
                    function ()
                    StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f193000%2fdynamic-linkage-of-locatorpane-and-inputfield%23new-answer', 'question_page');

                    );

                    Post as a guest















                    Required, but never shown





















































                    Required, but never shown














                    Required, but never shown












                    Required, but never shown







                    Required, but never shown

































                    Required, but never shown














                    Required, but never shown












                    Required, but never shown







                    Required, but never shown







                    Popular posts from this blog

                    Isabella Eugénie Boyer Biographie | Références | Menu de navigationmodifiermodifier le codeComparator to Compute the Relative Value of a U.S. Dollar Amount – 1774 to Present.

                    Lioubotyn Sommaire Géographie | Histoire | Population | Notes et références | Liens externes | Menu de navigationlubotin.kharkov.uamodifier« Recensements et estimations de la population depuis 1897 »« Office des statistiques d'Ukraine : population au 1er janvier 2010, 2011 et 2012 »« Office des statistiques d'Ukraine : population au 1er janvier 2011, 2012 et 2013 »Informations officiellesCartes topographiquesCarte routièrem

                    Mpande kaSenzangakhona Biographie | Références | Menu de navigationmodifierMpande kaSenzangakhonavoir la liste des auteursm