CopyTo Method

Syntax

CWIMAQArc.CopyTo DestArc

Purpose

Copies all of the properties from the source arc into the destination arc.

Parameters

DestArc As CWIMAQArc

The destination arc.

Example

Private Sub Run_Click()
    Dim Arc1 As New CWIMAQArc
    Dim Arc2 As New CWIMAQArc
    
    'Initialize Arc1 and copy its data into Arc2
    Arc1.Initialize 30, 40, 50, 60, 45, 315
    Arc1.CopyTo Arc2
    
    'Overlay Arc2 on the viewer's image
    CWIMAQViewer1.Image.Overlays(1).DrawArc Arc2, cwimaqOverlayModeFrame
End Sub

See Also

Initialize