Bitmap.ApplyBitmapEffect method - Developer Area

API Documentation > Corel DESIGNER > 2023-v24.3 > Bitmap > IVGBitmap

Bitmap.ApplyBitmapEffect method

Applies the specified bitmap effect

Syntax:

Sub ApplyBitmapEffect(ByVal UndoString As String, ByVal Command As String)

Parameters:

Name	Type	Description
UndoString	String	Specifies the name in the Undo list
Command	String	Specifies the effect to apply

Remarks:

The ApplyBitmapEffect method applies the specified bitmap effect.

Examples:

The following VBA example applies the Whirlpool effect to all bitmaps on the active page.

Sub ApplyBitmapEffect()
  Dim s As Shape
  For Each s In ActivePage.Shapes
    If s.Type = cdrBitmapShape Then
      If s.Bitmap.Mode <> cdrRGBColorImage Then
        s.Bitmap.ConvertTo cdrRGBColorImage
      End If
      s.Bitmap.ApplyBitmapEffect "Whirlpool", "WhirlpoolEffect WhirpoolSpacing=20,WhirlpoolSmear=9,WhirlpoolTwist=70,WhirlpoolStreak=60,WhirpoolWarp=1,WhirlpoolRandomSeed=0"
    End If
  Next s
End Sub

Version Information:

CorelDRAW:	X7.4, X7, X7.6, X8, 2017, 2018, 2019, 2019.2, 2020, 2021, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25
Corel DESIGNER:	X7, 2017.1, 20.1, 2019.2, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25