Jig,Ghost Image,Grdraw or Grvecs

[gilseorin]

Hi,all.
EntityJig problem has solved.
But, Ghost Image(rubber band,especially in scale),
grdraw or grvecs in LispFuction has not solved.

Someone has solved on this issue?
Or Impossible with vb.net or c#.net?

[NathTay]

For an equivalent of the grdraw and grvecs methods have a look at the DrawVector method of the Editor class.

To show a rubberband while jigging. In your Sampler function create a line from the base point to the current cursor position. In your WorldDraw function draw the line in the same way as you draw the object you are jigging.

Regards - Nathan

[gilseorin]

Thank you so much,Nathan.
I will try as you advise.

[gilseorin]

One problem has occurred.
How could the program catch the current cursor position modifying time by time.

[NathTay]

Private WithEvents objEditor As Editor

Private objTrackedPt As Point3d

Private Sub objEditor_PointMonitor(ByVal sender As Object, ByVal e As Autodesk.AutoCAD.EditorInput.PointMonitorEventArgs) Handles objEditor.PointMonitor
If e.Context.PointComputed = True Then
objTrackedPt = e.Context.RawPoint
End If
End Sub

[gilseorin]

It's very awesome function!
I have difficulty in creating a circle with ghost image on scaling(rubber band) as autocad does.

I'll try and try till it'll be done.
Nathan,thank you so much again for your advice and the function.

[gilseorin]

Hi, all.
Finally, I succeeded creating a circle with the effect of the
ghost image.
It can be upscaled or downscaled as to where the mouse cursor moves.
But, it is not only complete,but also correct.
Could someone improve my code? Or helpful advice?

I attached my code below.
Thanks in advance.