Object Model Reference : Classes : B : Bitmap : Properties : Bitmap.Cropped |
Property Cropped As Boolean
Member of Bitmap
The Cropped property returns True if the bitmap can be cropped.
The Cropped property returns a read-only value.
The following VBA example displays the number of bitmaps that can be cropped on the active page.
Sub Test() |
Dim s As Shape, n As Long |
n = 0 |
For Each s In ActivePage.Shapes |
If s.Type = cdrBitmapShape Then |
If s.Bitmap.Cropped Then n = n + 1 |
End If |
Next s |
MsgBox "There are " & n & " bitmaps which can be cropped." |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.