Help! Why the ApplyPatternFill Method take so much time?

[iceage3]

In CorelDRAW 2017 and upper versions, when I use this ApplyPatternFill method of shape class, it will take about 10 seconds to finish the process. But in the old version like X4,X5,X6,etc, this will be really fast , so why? Anyone can help? We often do lots of patternfill works use VBA ,this means it will take much more time

Thanks in advance!

Sample code like this will take 10 or more seconds in CorelDRAW 2017,2018 and upper versions:

Sub test123()
ActiveSelection.Shapes(1).Fill.ApplyPatternFill cdrFullColorPattern, "C:\1.pat"
End Sub

[shelbym]

Try loading it this way instead:

Sub test123()
    ActiveSelection.Shapes(1).Style.Fill.LoadFill "C:\Users\Shelby\Documents\Corel\Corel Content\Fills\Starter pack\Vector Pattern 232.fill"
End Sub

Happy Coding,

-Shelby

[iceage3]

Thank you very much! Shelbym. This is fast indeed. The only problem is that we can't edit .fill files directly.