有時我們的功能非常的復雜,一次性要執行的功能非常多,所以我們會看到屏幕上的形狀在以非常高的速度在變化,而實際上我們并不需要看到這些變化,而CDR程序里面是可以自由控制這個顯示的,我們把這種渲染關閉,可以有效加快運行速度,而且可以避免自己花費不必要的注意力,下面開始介紹這個開關.

Sub 第一個插件()tool.changeUnitCorelDRAW.Optimization = TrueFor i = 1 To 10CorelDRAW.ActivePage.ActiveLayer.CreateRectangle 10 * i * 1.1, 20, 10 * i * 1.1 + 10, 10Next iCorelDRAW.Optimization = FalseCorelDRAW.Refresh End Sub

• 這是把上一節的代碼稍作修改演示, 因為關閉渲染要在非常大型而復雜的功能里面才能展示出來,所以我這里不想麻煩,大家只要知道有這個功能就行了
  Optimization 就是這個禁用開關, 為true的時候就打開了禁用,也就是說所有的操作已經在進行并完成,但是我們的屏幕上卻并不會同步渲染.
• 等我們的操作進行完了,再把Optimization 設置為false關閉禁用渲染.這個時候所有的操作都是會再一次實際同步顯示.
• 但是這里有一個問題就是,我們之前的運行結果并沒有刷新,所以后面只要再重新刷新渲染一次即可讓我們的運行結果得到顯示:
  CorelDRAW.Refresh,Refresh就是刷新的功能,讓整個CDR程序重新渲染一次.

大家在制作高級復雜功能的時候就會用到這個功能了,這個功能和一鍵撤銷功能經常是連在一起使用的

總結

以上是生活随笔為你收集整理的CorelDRAWX4的VBA插件开发(十九)渲染显示开关的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。