Click or drag to resize

McSCalibrationGetAutoPixelSize Method

Calculates calibration parameters based on the image and returns pixel per unit.

Namespace:  MediaCy.Addins.SCalibration
Assembly:  MediaCy.Addins.SCalibration (in MediaCy.Addins.SCalibration.dll) Version: 3.1.0.0
Syntax
VB
Copy
Public Function GetAutoPixelSize ( 
	dStep As Double,
	im As McImage
) As Double

Parameters

dStep
Type: SystemDouble
dStep - distance between micrometer lines in calibrated units. If the micrometer contains lines with different periods (e.g. 0.01, 0.05 and 0.1 mm), the shortest distance has to be used as parameter (e.g. 0.01)
im
Type: MediaCy.IQL.EngineMcImage

Return Value

Type: Double
Remarks
The image must have a micrometer. Lines of micrometer should be separable. The number of lines (divisions,ticks) should be between 3 and 50.
Examples
VB
Copy
Sub AutoCalibrateActiveImage()
    If ActiveImage.SpatialCalibration Is Nothing Then
        Set ActiveImage.SpatialCalibration = Engine.CreateObject("McSpatialCalib")
    End If
    Set ActiveSpatialCalibration = ActiveImage.SpatialCalibration
     'run auto-calibration, 10um per division
    tempVar = SCalibration.GetAutoPixelSize(0.01)
    ActiveSpatialCalibration.PixelSizeX = tempVar
    ActiveSpatialCalibration.PixelSizeY = tempVar
    ActiveSpatialCalibration.Name = "4X"
    ActiveSpatialCalibration.Unit = 4    'mm
End Sub
See Also