Application.Optimization property - Developer Area

API Documentation > CorelDRAW > 2020 > Application > IVGApplication

Application.Optimization property

Gets or sets whether to use optimization

Syntax:

Property Get Optimization() As Boolean
Property Let Optimization(ByVal Value As Boolean)

Remarks:

The Optimization property returns or specifies the optimization, the ability to suppress screen redraws when working with documents and shapes.

Setting the Optimization property to True disables some internal updating. It is important to disable optimization when exiting a macro, or CorelDRAW may not update its screens. You may also want to refresh the document window after disabling optimization so the display is updated and reflects all changes.

Examples:

The following VBA example creates 100 random circles in the active document, with optimization enabled for increased performance.

Sub Optimize()
  Dim i As Long
  Dim x As Double, y As Double, r As Double
  Dim n As Long
  Dim num As Long
  Dim MaxX As Double, MaxY As Double, MaxR As Double
  MaxX = ActivePage.SizeWidth
  MaxY = ActivePage.SizeHeight
  MaxR = 1
  num = ActivePalette.ColorCount
  Optimization = True
  For i = 1 To 100
    x = Rnd() * MaxX
    y = Rnd() * MaxY
    r = Rnd() * MaxR
    n = CLng(Fix(Rnd() * num)) + 1
    Set s = ActiveLayer.CreateEllipse2(x, y, r)
    s.Fill.ApplyUniformFill ActivePalette.Color(n)
  Next i
  Optimization = False
  ActiveWindow.Refresh
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