API Documentation > CorelDRAW > 2025-v26 > PrintPostScript > IPrnVBAPrintPostScript
PrintPostScript.TrueTypeToType1 property
Specifies whether TrueType fonts should be converted into Type 1 before downloading them
Syntax:
Property Get TrueTypeToType1() As Boolean
Property Let TrueTypeToType1(ByVal Value As Boolean)
Remarks:
The TrueTypeToType1 property specifies a Boolean (True or False) value that 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.
Examples:
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