Object Model Reference : Classes : P : PrintPostScript : Properties : PrintPostScript.TrueTypeToType1 |
Property TrueTypeToType1 As Boolean
Member of PrintPostScript
The TrueTypeToType1 property controls the download of TrueType fonts to a PostScript printer. TrueType fonts are converted to Type 1 fonts so that they can be downloaded. If fonts are not downloaded to the printer (and they are not already installed on the printer), the fonts print as curves or bitmaps.
The following VBA example creates text strings in different fonts and then prints them. The fonts are downloaded to the printer (if PostScript), and the document is printed again.
Sub Test() |
Dim s As Shape |
Dim n As Integer |
Dim dLeft As Double |
Dim dBottom As Double |
dLeft = 0.25 |
dBottom = ActivePage.SizeHeight - 0.4 |
For n = 1 To FontList.Count Step 5 |
Set s = ActiveLayer.CreateArtisticText(dLeft, dBottom, "Some Text String") |
s.Text.FontProperties.Name = FontList(n) |
dBottom = dBottom - 0.4 |
Next n |
With ActiveDocument |
.PrintSettings.PostScript.DownloadType1 = False |
.PrintSettings.PostScript.TrueTypeToType1 = False |
.PrintOut |
.PrintSettings.PostScript.DownloadType1 = True |
.PrintSettings.PostScript.TrueTypeToType1 = True |
.PrintOut |
End With |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.