OberonPlace.com Forums - Help! Why the ApplyPatternFill Method take so much time?

OberonPlace.com Forums (http://forum.oberonplace.com/index.php)

- CorelDRAW/Corel DESIGNER VBA (http://forum.oberonplace.com/forumdisplay.php?f=16)

- - Help! Why the ApplyPatternFill Method take so much time? (http://forum.oberonplace.com/showthread.php?t=24847)

Help! Why the ApplyPatternFill Method take so much time?

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 :bigcry::bigcry:

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

Help! Why the ApplyPatternFill Method take so much time?

Try loading it this way instead:

Code:

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

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