I made one step forward using FvwmEvent, but I'm now stuck about passing
arguments to it.

On Mon, 7 Sep 2009, Lucio Chiappetti wrote:

> *** now, what am I missing ? ***
>
> I'd like to find a way to create the icon straight where the mouse is
> currently pointed (to avoid having to "retrieve" it from the parking
> position).
>
> I thought I could do that e.g. with a shift-MB1 (currently I'm testing using
> a key on root window) provided I define a PROPER function
>
> Mouse 1 A S PointLaser

> DestroyFunc PointLaser
> AddToFunc   PointLaser
>  + I Exec xterm -name Laser -iconic

I truncated this function here. I wrote the move part in another function
  DestroyFunc rePointLaser
  AddToFunc   rePointLaser
   + I ThisWindow ("Laser") Move m-40p m-40p

which I bound (is this the right expression) to FvwmEvent in the staruto
  + "I"   Module FvwmEvent Event-PL

*Event-PL: Cmd Function
*Event-PL: PassId
*Event-PL: add_window rePointLaser

This way my icon is positioned with its hotpoint at (40,40) from the
mouse. For the "beam" icon (80x80) this means it's centered at the mouse.

Now as you remember, I was using three different icons (beam, circle, and
ellipse), which were swapped with F4 F5 F6. These icons have different
sizes.

What I'd want to do is to redefine the F4 F5 F6 so that instead of issuing
a Style command to a pre-existing "Laser" window, they create one, and use
the rePointLaser function/event passing to it a different shift size
(actually a couple of xsize,ysize).

But how to do that is unclear to me ...

--
------------------------------------------------------------------------
Lucio Chiappetti - INAF/IASF - via Bassini 15 - I-20133 Milano (Italy)
For more info : http://www.iasf-milano.inaf.it/~lucio/personal.html