How to draw line like line of DimOrdinate

I picked one point on suface and get suface name. I want draw line like line of DimOrdinate.
When mouse move, event auto draw line with start point is point of suface, end point is location mouse move.
Show infor when end click.
have you solution? please help me