DreamScape

Bar Code Fonts

Using Bar Code is easy as importing the proper Bar Code TrueType font and writing text with it!

This feature allow developers to create also catalogs with the products' BarCodes, so if printed can also be used for the stock management!

Look at this example, it is easier to see than to explain...

Private Sub Command11_Click()
  Dim PDFRPT As New PDFDocument
  PDFRPT.NewPDF "This is my first PDF"
  PDFRPT.FontHeight = 20
  PDFRPT.FontName = "Helvetica"
  PDFRPT.TextOut "This is 'Helvetica' font", 10, 10
  PDFRPT.AddFont "3 of 9 Barcode", "C:\WINNT\Fonts\3of9_new.ttf"
  PDFRPT.FontName = "3 of 9 Barcode"
  PDFRPT.TextOut "This is a Barcode font", 10, 30
  PDFRPT.SavePDF "c:\provaocx.pdf"
End Sub

This is the result:



		Introduction A very simple PDF file Changing Font Type and Size Changing Paragraph Alignment (Left, Right, Center, Full Justification) Changing Font Fill and Outline properties How to obtain Wordwrapped Text Unit of Measures Lines and Rectangles Line and Fill Colors Adding Pages Outlines Floating Annotations Images (BMP, JPG, WMF, ICO) Hyperlinks to other pages of the same file Hyperlinks to another PDF file Hyperlinks to a WEB page Importing TrueType Fonts Bar Code Fonts Optimizing repeated images (Logos, Backgrounds) Working on previous pages Changing PDF porperties (Author, Subject) Send Back PDF content from ASP pages without writing PDF files Obtaining a string's width/height given the font name and font height Runtime Licenses redistribution		Bar Code Fonts Using Bar Code is easy as importing the proper Bar Code TrueType font and writing text with it! This feature allow developers to create also catalogs with the products' BarCodes, so if printed can also be used for the stock management! Look at this example, it is easier to see than to explain... Private Sub Command11_Click() Dim PDFRPT As New PDFDocument PDFRPT.NewPDF "This is my first PDF" PDFRPT.FontHeight = 20 PDFRPT.FontName = "Helvetica" PDFRPT.TextOut "This is 'Helvetica' font", 10, 10 PDFRPT.AddFont "3 of 9 Barcode", "C:\WINNT\Fonts\3of9_new.ttf" PDFRPT.FontName = "3 of 9 Barcode" PDFRPT.TextOut "This is a Barcode font", 10, 30 PDFRPT.SavePDF "c:\provaocx.pdf" End Sub This is the result: