TIECropToolInteraction.SetBitmapPolygon

Declaration

procedure SetBitmapPolygon(Rect: TRect);

Description

Sets the area of the image selected for cropping. This is the programatic equivalent of the user dragging the grips of the crop tool selection.

Note:
- Values are in terms of the bitmap. Use XScr2Bmp and YScr2Bmp to convert screen values to bitmap values
- You must call TImageEnView.Invalidate if you change this property when the crop selection is visible

Example

// Select 80% of image
ARect := Rect( MulDiv( ImageEnView1.IEBitmap.Width, 10, 100 ),
               MulDiv( ImageEnView1.IEBitmap.Height, 10, 100 ),
               MulDiv( ImageEnView1.IEBitmap.Width, 90, 100 ),
               MulDiv( ImageEnView1.IEBitmap.Height, 90, 100 ));
ImageEnView1.CropTool.SetBitmapPolygon( ARect );
ImageEnView1.Invalidate();

TIECropToolInteraction.SetBitmapPolygon