Obtain the coordinates of the mouse in the graphics objects

[Eugene Lutsenko]

Is it possible to click the mouse cursor on the image of the graphic to get the coordinates of the cursor inside it in pixels? If possible, how to do it?

[rdonnay]

oStatic:lbClick := {|a,b,o|aCoords := b}

[Tom]

To track cursor position with any move over the object:

Code: Select all

@ x,y DCSTATIC ... EVAL {|o|o:Motion := {|aPos|oPosObject:SetCaption(Str(aPos[1])+/Str(aPos[2]))}}

@ a,b DCSAY '' OBJECT oPosObject SIZE 20,1

[Eugene Lutsenko]

Somewhere I saw a simple graphical editor similar to Paint, made ​​in Alaska. And now could not find it. Tell me, please, where to find the source.