API Documentation > CorelDRAW > 2025-v26 > FountainColor > IVGFountainColor
FountainColor.Delete method
Removes the object from the FountainColors collection
Syntax:
Sub Delete()
Remarks:
The Delete method removes a color point from a fountain fill. You cannot delete starting and ending color points.
Examples:
The following VBA example removes any intermediate color points in a fountain fill, leaving only the starting and ending points.
Sub Test()
Dim cl As FountainColor
If ActiveShape.Fill.Type <> cdrFountainFill Then
  MsgBox "The selected shape must have a fountain fill."
  Exit Sub
End If
For Each cl In ActiveShape.Fill.Fountain.Colors
  If cl.Position > 0 And cl.Position < 100 Then cl.Delete
  Next cl

End Sub