Value | Description |
---|---|
miArea | Rectangle/polygon area measurement |
miLineLen | Line length (or distance of two points) |
miPutLine | Insert a line object |
miPutBox | Insert a rectangle object |
miPutEllipse | Insert a ellipse/circle object |
miPutBitmap | Insert a bitmap object |
miPutText | Insert a text object |
miObjectSelect | Objects select or modify (resizing an object pressing ALT key the object will maintain the aspect ratio) |
miDragLen | Dynamically measure distance |
miPutRuler | Insert a ruler object |
miPutPolyLine | Insert a polyline, polygon or free hand painting (See also: PolylineEndingMode and PolylineClosingMode |
miPutAngle | Insert an angle measurement object (three single clicks) |
miPutMemo | Insert a multi line text object |
miPutLineLabel | Insert a line with a label |
miEditPolyline | Edit (add/move/delete) points of a polyline. Press CTRL to remove a point |
miUnStampMode | Single click doesn't insert a new object |
miArea | ImageEnView1.MouseInteractLayers := [ mlCreateTextLayers ]; and set ImageEnView1.CurrentLayer.RulerMode := iermLabel; in TImageEnView.OnNewLayer | TImageEnView.MouseInteractLayers |
miLineLen | No equivalent | |
miPutLine | ImageEnView1.MouseInteractLayers := [ mlClickCreateLineLayers ]; | TImageEnView.MouseInteractLayers |
miPutBox | ImageEnView1.MouseInteractLayers := [ mlCreateShapeLayers ]; and set IEGlobalSettings().DefaultLayerShape := iesRectangle; (or use TImageEnView.OnNewLayer) | TImageEnView.MouseInteractLayers |
miPutEllipse | ImageEnView1.MouseInteractLayers := [ mlCreateShapeLayers ]; and set IEGlobalSettings().DefaultLayerShape := iesEllipse; (or use TImageEnView.OnNewLayer) | TImageEnView.MouseInteractLayers |
miPutBitmap | ImageEnView1.MouseInteractLayers := [ mlCreateImageLayers ]; | TImageEnView.MouseInteractLayers |
miPutText | ImageEnView1.MouseInteractLayers := [ mlCreateTextLayers ]; and set TIETextLayer( ImageEnView1.CurrentLayer ).WordWrap := False; in TImageEnView.OnNewLayer | TImageEnView.MouseInteractLayers |
miObjectSelect | ImageEnView1.MouseInteractLayer := [ mlMoveLayers, mlResizeLayers ] | TImageEnView.MouseInteractLayers |
miDragLen | ImageEnView1.MouseInteractGeneral := [ miMeasureLength ]; | TImageEnView.MouseInteractGeneral |
miPutRuler | ImageEnView1.MouseInteractLayers := [ mlClickCreateLineLayers ]; and set ImageEnView1.CurrentLayer.RulerMode := iermLabel; in TImageEnView.OnNewLayer | TImageEnView.MouseInteractLayers |
miPutPolyLine | ImageEnView1.MouseInteractLayers := [ mlClickCreatePolylineLayers ]; | TImageEnView.MouseInteractLayers |
miPutAngle | ImageEnView1.MouseInteractLayers := [ mlClickCreateAngleLayers ]; | TImageEnView.MouseInteractLayers |
miPutMemo | ImageEnView1.MouseInteractLayers := [ mlCreateTextLayers ]; | TImageEnView.MouseInteractLayers |
miPutLineLabel | ImageEnView1.MouseInteractLayers := [ mlClickCreateLineLayers ]; | TImageEnView.MouseInteractLayers |
miEditPolyline | ImageEnView1.MouseInteractLayers := [ mlEditLayerPoints ]; | TImageEnView.MouseInteractLayers |
miUnStampMode | ImageEnView1.LayerOptions := ImageEnView1.LayerOptions - [ loStampMode ]; | loStampMode |