GefObject.Fill (read-only property)

Gets the GefFillFormat for the object.
Syntax: Set GefFillFormat = object.Fill
Description: The fill is the interior portion of the object. To access the fill animation, use the FillAnim property.

Returns Nothing if this property is not valid for the object.


Sub GefObject_Fill()
    Dim oCimObj As GefObject
    Dim oCimFillFmt As GefFillFormat
    Set oCimObj = CimGetObject
    Set oCimFillFmt = oCimObj.Fill
    If Not oCimFillFmt Is Nothing Then
        oCimFillFmt.ForeColor.RGB = &HBB& 'red
        CimGetScreen.Refresh False
    End If
End Sub