公告
本專欄的相關(guān)的文章已不在簡書同步更新，請直接訪問 VBA探秘 官方網(wǎng)站或關(guān)注微信公眾號獲取最新文章動態(tài)。
coreldraw-vba-change-active-view-type
目的
這篇教程將教會你使用 CorelDRAW VBA代碼使用 ActiveView 類更改當(dāng)前活動文檔的視圖類型侨把。
ActiveView介紹
ActiveView類表示活動視圖的含義，簡單來說就是：用戶當(dāng)前能夠看到的所有文檔區(qū)域厚掷。
ActiveView類通過它的屬性和方法定義了當(dāng)前可見對象的特征绿聘，描述了對象外觀和操作行為。CorelDRAW中的視圖可以根據(jù)用戶的意愿和目的來設(shè)定办绝。
在CorelDRAW X4版本中伊约，一共有以下6種不同質(zhì)量的視圖類型：
- 草稿：該類型顯示單一顏色填充和低分辨率的位圖圖像。透鏡和噴泉填充也顯示顏色孕蝉，用單一圖案來代表每個填充屡律，棋盤格圖案代表兩種顏色的填充，雙箭頭圖案代表全色填充降淮，陰影線圖案代表位圖填充超埋，PS圖案代表PostScript填充。
- 增強(qiáng)：該類型顯示出兩倍的象素點(diǎn)，以達(dá)到最佳的顯示質(zhì)量霍殴。
- 使用疊印增強(qiáng)：該類型顯示出兩倍的象素點(diǎn)媒惕，在達(dá)到最佳的顯示質(zhì)量的同時，突出顯示疊印的對象繁成。
- 正常視圖：該類型顯示所有的填充吓笙、所有的對象和高分辨率位圖圖像。顯示質(zhì)量的設(shè)置不會對繪圖大小產(chǎn)生影響巾腕，只影響繪圖在屏幕上的顯示面睛。
- 線框：該類型只顯示所有對象包括單色位圖的輪廓。
- 簡單線框：只顯示輪廓尊搬，其他任何的東西都不顯示叁鉴。
代碼演示
以下代碼用來更改當(dāng)前活動視圖的顯示質(zhì)量：
' 獲取當(dāng)前視圖
Dim view As ActiveView
Set view = Application.ActiveWindow.ActiveView
' 更改視圖質(zhì)量類型
view.Type = cdrDraftView '草稿
'view.Type = cdrEnhancedView '增強(qiáng)
'view.Type = cdrEnhancedViewWithOverprints ' 使用疊印增強(qiáng)
'view.Type = cdrNormalView ' 正常視圖
'view.Type = cdrWireframeView ' 線框
'view.Type = cdrSimpleWireframeView ' 簡單線框
原創(chuàng)聲明：本文首發(fā)于個人CorelDRAW VBA博客，請尊重文章版權(quán)佛寿。
轉(zhuǎn)載請注明原文鏈接：http://www.cdrvba.com/coreldraw-vba-change-active-view-type
