IMcImageSetGetMaximumDimensionLength Method |
![]() |
Namespace: MediaCy.IQL.Sets
Function GetMaximumDimensionLength ( DimensionOfInterest As mcImageSetDimensions ) As Integer
Sub ShowSetDims() If ImageSets.Count = 0 Then exit sub End If Dim iLenZ As Long iLenZ = ImageSets(0).GetMaximumDimensionLength(mcisdZ) Dim iLenS As Long iLenS = ImageSets(0).GetMaximumDimensionLength(mcisdSite) MsgBox (CStr(ImageSets(0).CreationDate) + vbCrLf + CStr(iLenS) + " Sites with " + CStr(iLenZ) + " Z planes") End Sub