Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2013

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: LocatorPane and tooltips for the locators

  • To: mathgroup at smc.vnet.net
  • Subject: [mg132097] Re: LocatorPane and tooltips for the locators
  • From: "E. Martin-Serrano" <drmartinspain at gmail.com>
  • Date: Thu, 5 Dec 2013 03:05:50 -0500 (EST)
  • Delivered-to: l-mathgroup@mail-archive0.wolfram.com
  • Delivered-to: l-mathgroup@wolfram.com
  • Delivered-to: mathgroup-outx@smc.vnet.net
  • Delivered-to: mathgroup-newsendx@smc.vnet.net
  • References: <20131130072504.F31CE69F2@smc.vnet.net> <5299C702.1080301@hs-weingarten.de>

Dear Dr. Kragler,

Many thanks for your kind response. It has been useful in solving partially
the problem I had.



Kind regards



E. Martin-Serrano







De: Dr. Robert Kragler [mailto:kragler at hs-weingarten.de]
Enviado el: s=E1bado, 30 de noviembre de 2013 12:08
Para: E. Martin-Serrano
Asunto: Re: LocatorPane and tooltips for the locators

Dear Dr. Martin-Serrano,

reading your question about LocatorPane and Tooltip I am not quite sure
whether my reply partly answers your problem with Tooltip.
Recently, I had a problem where I wanted to display points x_k + y_k I in
the complex plane with Graphics but at the same time show the coordinates
with Tooltip. The essential tip came from Michael Trott/WRI which is an
extension not given in the documentation for Tooltip. I just show some
snippets of code which could be perhaps illuminating for you :

pts={ x1+y1 I, ..., xn+yn I } ;

ttip=Tooltip[#, #1[[1]] . {1,I} //TraditionalForm, TooltipStyle ->
{Red,Bold}] &;

Show[ ContourPlot[...],
            Graphics[{ ....,
                             Table[ {Red,PointSize[Medium], Point @
{Re[#],Im[#]}&  @ pts[[i]] // ttip}, {i,pts//Length}],
                             ....
                            }],
            AspectRatio-> Automatic, opts]

This shows the points Point @ {xi,yi} as red dots and at the same time
Tooltip displays with pts[[i]] // ttip  the corresponding value (xi + yi
\[ImaginaryI] ) in traditional form.

Best regards,
Robert Kragler

Am 30.11.2013 08:25, schrieb E. Martin-Serrano:

Hi,

I have the below sketchy  *LocatorPane* piece of code  with dynamic
locators,  defined over  the set of points pts . I use this device to deal
with multiple 2D Bezier curves, which involve several sets of  grouped
locators  for the controls of each curve. *LocatorPane* imposes some
restrictions on dynamic programs. **Locator** itself is (should be) much
more flexible but it does not work for me yet. When the dynamic stuff gets
just a bit complex (not very much) *Locator* does not work (definitively)
and *LocatorPane* seems to be much more agile and handy, by far. But it
imposes other restrictions not to be mentioned here, except for the one
about *Tooltip* on the locators (as far as I am aware of it).

Now, it follows  the *LocatorPane* piece of pseudo code  with dynamic
locators

----------------------------------------

pts = *list of  {xi, yi}  locator coordinates*

calcAll[pts_,stuff_]:=  (* calcAllBody to treat secondary dynamic items*)

LocatorPane[Dynamic[pts, (pts = #; calcAll[pts, suff]) &],
*LocatorPaneBody*]

-----------------------------

This generates a LocatorPane with the set ts of dynamic  locators
partitioned according it is needed. But, I  need the locators to be wrapped
by *Tooltip*,  so that the current position of each  pts[[i]] could be
displayed  at will, however I can't  find how this can be done within the
*LocatorPane* construct, since the locators themselves are defined in the
heading part of the construct, namely: *Dynamic[pts, (pts = #; calcAll[pts,
suff]) &]*,  in no other place of the *LocatorPane* construct are the
locators mentioned.



Currently I have this working with inset labels on every locator, but it is
not the proper solution at all.



By the way, my previous post on Intersecting Bezier is just about 2D curves.



Any help will be appreciated.



Cheers.



E. Martin-Serrano






--
Prof. Dr. Robert Kragler
Hasenweg 5
D-88090 Immenstaad, Germany
Phone : +49 (7545) 2833 or 3500
Email : kragler at hs-weingarten.de <mailto:kragler at hs-weingarten.de>
URL :   http://portal.hs-weingarten.de/web/kragler





  • Prev by Date: Manipulate and Module
  • Next by Date: Re: Laptop numpad enter does not evaluate cell
  • Previous by thread: Re: Manipulate and Module
  • Next by thread: Re: LocatorPane and tooltips for the locators