Object Model Reference : Classes : C : CloneLink : Properties : CloneLink.BitmapColorMaskLinked
|
|
| Object Model Reference : Classes : C : CloneLink : Properties : CloneLink.BitmapColorMaskLinked |
Property BitmapColorMaskLinked As Boolean
Member of CloneLink
The BitmapColorMaskLinked property returns a value indicating if the color attributes of a clone object is linked to its parent object. If the BitmapColorMaskLinked property is True, the color attributes of the cloned object are linked to the parent object. If linked, the clone has the same bitmap mask effect as its parent object.
You can also break or restore a link by assigning a value to the property.
The following VBA example determines if the BitmapColorMaskLinked property of the cloned bitmap object is broken (that is, False). A dialog box prompts the user to restore the bitmap color mask link. If Yes is chosen, the link is restored and a message is displayed in a message box.
Sub PresentData() |
If Clipboard.DataPresent("Text") Then |
Clipboard.Clear |
Else |
MsgBox "There is no text data in the Clipboard." |
End If |
End Sub |
Sub BitmapLink() |
Dim s As Shape |
Dim ret As VbMsgBoxResult |
Set s = ActiveSelection.Shapes(1) |
If Not s.CloneLink.BitmapColorMaskLinked Then |
ret = MsgBox("The Bitmap color mask link is broken. Do you want to restore it?", vbYesNo) |
If ret = vbYes Then |
s.CloneLink.BitmapColorMaskLinked = True |
MsgBox "The link is now active." |
End If |
End If |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.