IMcAlignmentSetAlignTransforms Method |
![]() |
Namespace: MediaCy.IQL.Align
Sub SetAlignTransforms ( vTransforms As Object )
With ThisApplication.ActiveImage.Alignment .SetSourceForAlignment Dim NFrames As Long, i NFrames = ThisApplication.ActiveImage.Alignment.NumberOfFrames ReDim vAfTransforms(NFrames - 1) As AFFINE_TRANSFORM For i = 0 To NFrames - 1 vAfTransforms(i).dx = 6 vAfTransforms(i).dy = 0 vAfTransforms(i).angle = 0 vAfTransforms(i).scaleXY=1 Next i .ReferenceFrame = 0 'set predefined transforms .SetAlignTransforms vAfTransforms .CreateAlignedImage End With