TIEGlobalSettings.MeasureUnits
Declaration
MeasureUnits: TIEMeasureUnits;
Description
Specifies the descriptive text for each
measurement unit.
Examples
IEGlobalSettings().MeasureUnits[ieuNanometers] := 'uM';
// Show statistics while making a selection
procedure TfrmMain.ImageEnView1SelectionChanging(Sender: TObject);
const
Units = ieuPixels;
var
uS: string;
begin
uS := IEGlobalSettings().MeasureUnits[ Units ];
Label1.Caption := format( 'Area: %.2f %sē', [ ImageEnView1.CalcSelectionArea( Units ), uS ]);
Label2.Caption := format( 'Perimeter: %.2f %s',[ ImageEnView1.CalcSelectionLen( Units ), uS ]);
Label3.Caption := format( 'Centroid: %d,%d', [ ImageEnView1.CalcSelectionCentroid.X, ImageEnView1.CalcSelectionCentroid.Y ]);
end;
See Also
◼DefaultMeasureUnit
◼MeasureDecimalPlaces
◼RulerUnits
◼EnablePopupMenu