Continue function by select event

Hi Ori,

This suggests that you want to use an enter function such as enterPoint() or enterPoints(), and then using the ?addPointProc you can invoke another function each time the mouse is clicked. In your addPointProc you could test whether the cursor point is over a selectable object and control what happens next (e.g. select the object and/or take the action that you want to perform). However your update of "like Control C" is confusing as this would most likely terminate any active code.  For an enterPath or enterPoints a double click (giving the same last point two times) should complete the command and then they would invoke the ?doneProc function (for enterPoint it is only expecting one point and so should call it once the point has been entered). Here's a framework for what you might want to do (also you'd probably create a function wrapper around the call to enterPoints, to simplify the bindkey definition)

enterPoints( ?prompts '("Point to an object")
  ?addPointProc  "CCFaddPoint"
  ?doneProc      "CCFdoneProc"
)

procedure(CCFaddPoint(win pointList)
  let( (figure)
    when(figure = gePointToFig(win nil car(last(pointList)))
      ;;  .. go on to do something with 'figure'
    ); when
  ); let
); procedure

procedure(CCFdoneProc(win done pointList)
  when(done && win && pointList
    printf("You clicked these points: %L\n" pointList)
  ); when
); procedure

Hopefully this helps you.

Regards,

Lawrence.