主题：[求助]如何在FT中使用iTextSharp library創建PDF文件?

'定义要保存的文件名
Dim file As String = "c:\Demo.pdf"
'创建 PDF 文档
Dim dc As new iTextSharp.text.Document()
'创建实例,PDF 文件将会保存到这里
iTextSharp.text.pdf.PdfWriter.GetInstance(dc,new System.IO.FileStream(file,System.IO.FileMode.Create))
'打开文档
dc.Open()
'定义一个字体
Dim f As iTextSharp.text.pdf.BaseFont = iTextSharp.text.pdf.BaseFont.CreateFont("C:\WINDOWS\Fonts\SIMYOU.TTF", iTextSharp.text.pdf.BaseFont.IDENTITY_H, iTextSharp.text.pdf.BaseFont.NOT_EMBEDDED)
'写入一个段落
Dim ft As new iTextSharp.text.Font(f,12)
Dim p As new iTextSharp.text.Paragraph("你好, 这是用Foxtable创建的PDF文档 !",ft)
dc.add(p)
dc.Close()
'打开生成的文件
If FileSys.FileExists(file) Then
    Dim Proc As New Process '定义一个新的Process
    Proc.File = file '指定要打开的文件
    Proc.Start()
End If

don兄,以上代码win7系统测试通过。