Gets the color used for transparancy in the image. | |
Syntax: | Set GefColorFormat = object.TransparentColor |
Description: | The TransparentColor property will return
the GefColorFormat that specifies the transparent color used for
rendering this image. This information is only used of the "Transparency" property is
True. only RGB type colorformat is supported. Example: Sub GefImageFormat_TransparentColor() Dim oCimObj As GefObject Dim oCimImageFmt As
GefImageFormat Dim oCimImageColorFmt As
GefColorFormat Set oCimObj = CimGetObject Set oCimImageFmt =
oCimObj.ImageFormat If Not oCimImageFmt Is Nothing
Then oCimImageFmt.Transparency
= True Set
oCimImageColorFmt = oCimImageFmt.TransparentColor oCimImageColorFmt
RGB = &HFF00FF& 'Pink Color End If CimGetScreen.Refresh False End Sub |