ImageEn, unit ievect

TImageEnVect.MouseInteractVt

TImageEnVect.MouseInteractVt


Declaration

property MouseInteractVt: TIEMouseInteractVt;


Description

MouseInteractVt selects which mouse actions TImageEnVect will handle automatically.

Note: TImageEnVect.MouseInteractVt and MouseInteractGeneral are mutually exclusive, i.e. setting TImageEnVect.MouseInteractVt with clear MouseInteractGeneral.


Transition Information

If you are transitioning your code to TImageEnView Layers, instead of MouseInteractVt, use: TImageEnView.MouseInteractLayers with the equivalent types:
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