GefObject.Fill (read-only property)

Gets the GefFillFormat for the object.

Syntax:

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.

Example:

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

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. Example: `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`