Table of contents
TOC
折叠目录
展开目录

Plate.Delete 方法 (发布服务器)Plate.Delete Method (Publisher)

office 365 dev account|上次更新日期: 2018/3/13
|
3 参与人员

删除指定的印版。Deletes the specified plate.

语法Syntax

表达式删除( PlateReplaceWithReplaceTint)expression. Delete( PlateReplaceWith, ReplaceTint)

_expression_A 变量表示一个印版_expression_A variable that represents a Plate object.

参数Parameters

名称Name必需/可选Required/Optional数据类型Data Type说明Description
PlateReplaceWithPlateReplaceWith可选OptionalVariantVariant印版。要替换已删除的印版与印版。Plate. The plate with which to replace the deleted plate.
ReplaceTintReplaceTint可选OptionalPbReplaceTintPbReplaceTint如何替换淡色。How to replace tints.

注解Remarks

如果您尝试删除Plates集合中的最后一个印版,则返回"权限被拒绝"。Returns "Permission Denied" if you attempt to delete the last plate in the Plates collection.

ReplaceTint 参数可以是下面的pbReplaceTint常量之一。The ReplaceTint parameter can be one of the following pbReplaceTint constants.

| pbReplaceTintKeepTints|保持相同的色调百分比淡色使替代印版所表示的墨迹。例如,替换 100%色调的蓝色的黄色的 100%淡色。 ||pbReplaceTintMaintainLuminosity|保持淡色使替代印版所表示的墨迹相同的亮度值。例如,替换黄色的 100%色调蓝色的大约 10%淡色。 ||pbReplaceTintUseDefault|使用默认值。|如果指定pbReplaceTintMaintainLuminosity常量,则是基于已删除和更换印版所表示的墨迹的发光度值计算中的每种颜色更换油墨的百分比。发布服务器上执行下面的计算,其中_L1_是已删除的墨迹发光度,而_L2_是替换墨迹发光度: (100- L1) / (100- L2)。| pbReplaceTintKeepTints|Maintain the same tint percentage in the ink represented by the replacement plate as in the deleted plate. For example, replace a 100% tint of yellow with a 100% tint of blue.| | pbReplaceTintMaintainLuminosity| Maintain the same lightness value in the ink represented by the replacement plate as in the deleted plate. For example, replace a 100% tint of yellow with an approximately 10% tint of blue.| | pbReplaceTintUseDefault|Use the default. | If the pbReplaceTintMaintainLuminosity constant is specified, the percentage of replacment ink in each color is calculated based on the luminosity values of the inks represented by the deleted and replacement plates. Publisher performs the following calculation, where L1 is the deleted ink luminosity, and L2 is the replacement ink luminosity: (100- L1)/(100- L2).

例如,红色墨迹的发光度为 30,而黑色的发光度为 0。假定在出版物中的红色墨迹印版替换黑色墨迹印版。如果指定了pbReplaceTintKeepTints ,发布服务器上执行下面的计算来确定每个红颜色的黑色油墨的百分比: (100-30)/(100-0)。红色的 100%的颜色应为 70%黑色;一种颜色,是红色的 50%应为 35%黑色,等等。For example, red ink has a luminosity of 30, and black has a luminosity of 0. Suppose you replaced the red ink plate in a publication with a black ink plate. If pbReplaceTintKeepTints is specified, Publisher performs the following calculation to determine the percentage of black ink for each red color: (100-30)/(100-0). A color that was 100% red would now be 70% black; a color that was 50% red would now be 35% black, and so on.

如果指定pbReplaceTintKeepTints常量,则替换墨迹中的每种颜色的百分比是已删除的颜色相同。例如,如果红色墨迹将被替换为黑色油墨,100%色调,红色的被被 100%黑色,50%与 50%黑色等红色色调。If the pbReplaceTintKeepTints constant is specified, the percentage of the replacement ink in each color is the same as the deleted color. For example, if red ink is replaced with black ink, 100% tint of red is replaced by 100% tint of black, 50% red with 50% black, and so on.

您不能指定pbReplaceTintMaintainLuminositypbReplaceTintUseDefault常量,如果更换印版表示墨迹的发光度高 (即是亮) 比已删除的印版。这是因为不会较浅的墨迹打印在 100%以上,因此它将不能够匹配暗墨迹的发光度。You cannot specify the pbReplaceTintMaintainLuminosity or pbReplaceTintUseDefault constants if the replacement plate represents an ink that has a higher luminosity (that is, is lighter) than the deleted plate. This is because the lighter ink can not be printed at more than 100%, so it will not be able to match the luminosity of the darker ink.

示例Example

下面的示例循环遍历活动出版物的印版集合,确定哪些印版的墨迹不使用在出版物中,并删除它们。本示例假定至少一个印版正在的使用 (Delete 方法返回"权限被拒绝"如果试图删除集合中的最后一个印版)The following example loops through the active publication's plates collection, determines which plates represent inks not used in the publication, and deletes them. This example assumes that at least one of the plates is in use (the Delete method returns "Permission Denied" if you attempt to delete the last plate in the collection.)

Sub DeleteUnusedInks() 

Dim intCount As Integer 

With ActiveDocument.Plates 
 For intCount = .Count To 1 Step -1 
 With .Item(intCount) 
 If .InUse = False Then 
 Debug.Print "Name: " &; .Name 
 .Delete 
 End If 
 End With 
 Next 
End With 

End Sub
© 2018 Microsoft