What is fly2pdf; how does it differ from PDFCreator; give examples of use...

2006-07-19 03:41:15 by anonymous

Could someone tell me in plain English what does one use fly2pdf for? How is its use different from PDFCreator? Could you give some examples of when and why you would use one or the other program. Thanks!

2006-07-19 06:47:13 by thesmilyface

You can get a documentation. But it is in german. ;-)

With fly2pdf you can create pdf-files without using a printer or ghostscipt like PDFCreator. But it is not converter like Any2PDF. Indeed it contains a function txt2pdf but this is one of many functions.
With fly2pdf you can create pdf-files from the command line with many features.
Here some samples:
00 - Empty
01 - Hello World
02 - Pages
03 - Fonts
04 - Text and TextBoxes
05 - Lines and curves
06 - Images
07 - Annotations
08 - XObjects
09 - Forms
10 - Table of contents
11 - CTM
12 - Metadata and ViewerPrefences
13 - Encryption
14 - Convert
20 - Images2PDF

Here is a "Hello world." example with vbscript.
' HelloWorld script
' Part of fly2pdf
' Version: 1.0.0.0
' Author: Frank Heindörfer
' Comments: This script creates a pdf file with the sentence 'Hello world.' using the the activex dll fly2pdf.

Option Explicit

Const tFontSize = 72, x = 20

Dim fso, WshShell, AppTitle, Scriptname, ScriptBasename
Dim doc, docFont, docPage, docContent, fID, pID, contID

Set fso = CreateObject("Scripting.FileSystemObject")

Scriptname = fso.GetFileName(Wscript.ScriptFullname)
ScriptBasename = fso.GetFileName(Wscript.ScriptFullname)

AppTitle = "fly2pdf - " & ScriptBaseName

CheckWScriptVersion 5.1, AppTitle

Set doc = Wscript.CreateObject("fly2pdf.clsDocument", "fly2pdf_")

Set docFont = Wscript.CreateObject("fly2pdf.clsFont")
With docFont
.FontSubType = eFontSubType_Type1
.Name = eFontType1_Helvetica
End With
fID = doc.AddObject((docFont))

Set docPage = Wscript.CreateObject("fly2pdf.clsPage")
pID = doc.AddObject((docPage))

Set docContent = Wscript.CreateObject("fly2pdf.clsContent")
docContent.Text "Hello world.", (fID), (tFontSize), (x), docPage.Layout.Innerheight - PointsToMillimeters(tFontSize)
contID = doc.AddObject((docContent))
doc.AddObjectToPage CLng(pID), CLng(contID)

doc.Create(fso.GetBaseName(ScriptBasename) & ".pdf")

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Popup "Ready", 2, AppTitle, 64

'--- fly2pdf events ---

Public Sub fly2pdf_Progress(Id, ProgressMessage, ProgressValue, ProgressMax)
End Sub

Public Sub fly2pdf_Error(ID, Description)
MsgBox "An error is occured!" & vbcrlf & vbcrlf & _
"Error [" & ID & "]: " & Description, vbCritical + vbSystemModal, AppTitle
Wscript.Quit
End Sub