Bitmap.ResetCropEnvelope

Sub ResetCropEnvelope()

Member of Bitmap

The ResetCropEnvelope method removes a cropping path from a bitmap.

The following code example removes the cropping path from all bitmaps on the active page.

Sub Test() 
 Dim s As Shape 
 For Each s In ActivePage.Shapes 
  If s.Type = cdrBitmapShape Then 
   If s.Bitmap.Cropped Then s.Bitmap.ResetCropEnvelope 
  End If 
 Next s 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.