API Documentation > CorelDRAW > 2025-v26 > PrintPostScript > IPrnVBAPrintPostScript
PrintPostScript.DownloadType1 property
Specifies whether Type 1 fonts should be downloaded
Syntax:
Property Get DownloadType1() As Boolean
Property Let DownloadType1(ByVal Value As Boolean)
Remarks:
The DownloadType1 property specifies a Boolean (True or False) value that indicates whether to download Type 1 fonts to a PostScript printer. If fonts are not downloaded to the printer (and they are not already installed on the printer), they print as curves or bitmaps.
Examples:
The following VBA example creates text strings in different fonts and 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