用C# Builder生成PDF文件

Adobe PDF格式已经变成很多机构和公司进行跨平台制表的通用媒体格式。尽管我不是这个产品的狂热痴迷者，却不得不接受这样一个事实：用这个格式产生一个协定可能会比用Word还要好。

　　PDF的全称为Portable document．nbspFormat，即可移植文档格式，由广泛应用于专业打印领域的Postscript解释语言演化而来。为了使PDF迅速得到推广，Adobe不仅公开了技术规范，而且还免费向用户提供可以显示和打印PDF文件的Adobe Acrobat应用软件。

　　PDF最大的优势就在于其良好的一致性。PDF文档一旦创建之后，无论是在任何系统或打印设备上，都可以完好的保持最初的页面设计样式和风格，不会发生任何变化。正是由于PDF文档在格式上的一贯性，使得越来越多的网站开始提供基于PDF格式的文件和说明，从简单的宣传手册到完整的电子图书，PDF越来越受到人们的喜爱和重视。

　　事实上，除了可以用于静态信息显示之外，我们还可以通过Web脚本程序直接直接以PDF文档形式输出，不再仅仅局限于传统的HTML页面。

　　下面就用C# Builder生成一个简单的PDF文件：

　　首先，打开C# Builder，File-＞New-＞C# Application，Name这里我们设为"MKPDF"。

　　代码如下：

using System; using System.Drawing; using System.Collections; using System.ComponentModel; using System.Windows.Forms; using System.Data; using System.IO; using System.Text; namespace MKPDF { /// ＜summary＞ /// Application : Generation of PDF file from text /// Author : Pramod Kumar Singh /// Date : 25th July 2001 ///＜/summary＞ /// ＜summary＞ /// Summary description for WinForm. /// ＜/summary＞ public class WinForm : System.Windows.Forms.Form { /// ＜summary＞ /// Required designer variable. /// ＜/summary＞ static float pageWidth = 594.0f; static float pageDepth = 828.0f; static float pageMargin = 30.0f; static float fontSize = 20.0f; static float leadSize = 10.0f; //Create a PDF file. //PDF on Disk static StreamWriter pPDF=new StreamWriter("E://myPDF.pdf"); //PDF in Memory static MemoryStream mPDF= new MemoryStream(); //Convert the Text Data to PDF format and write back to //Memory Stream static void ConvertToByteAndAddtoStream(string strMsg) { Byte[] buffer=null; buffer=ASCIIEncoding.ASCII.GetBytes(strMsg); mPDF.Write(buffer,0,buffer.Length); buffer=null; } //Format the data length in xRef Format static string xRefFormatting(long xvalue) { string strMsg =xvalue.ToString(); int iLen=strMsg.Length; if (iLen＜10) { StringBuilder s=new StringBuilder(); int i=10-iLen; s.Append('0',i); strMsg=s.ToString() + strMsg; } return strMsg; } private System.ComponentModel.Container components = null; private System.Windows.Forms.Button button1; public WinForm() { // // Required for Windows Form Designer support // InitializeComponent(); // // TODO: Add any constructor code after InitializeComponent call // } /// ＜summary＞ /// Clean up any resources being used. /// ＜/summary＞ protected override void Dispose (bool disposing) { if (disposing) { if (components != null) { components.Dispose(); } } base.Dispose(disposing); } #region Windows Form Designer generated code /// ＜summary＞ /// Required method for Designer support - do not modify /// the contents of this method with the code editor. /// ＜/summary＞ private void InitializeComponent() { this.button1 = new System.Windows.Forms.Button(); this.SuspendLayout(); // // button1 // this.button1.Location = new System.Drawing.Point(64, 72); this.button1.Name = "button1"; this.button1.Size = new System.Drawing.Size(136, 32); this.button1.TabIndex = 0; this.button1.Text = "生成PDF"; this.button1.Click += new System.EventHandler(this.button1_Click); // // WinForm // this.AutoScaleBaseSize = new System.Drawing.Size(6, 14); this.ClientSize = new System.Drawing.Size(272, 181); this.Controls.Add(this.button1); this.Name = "WinForm"; this.Text = "WinForm"; this.ResumeLayout(false); } #endregion /// ＜summary＞ /// The main entry point for the application. /// ＜/summary＞ [STAThread] static void Main() { Application.Run(new WinForm()); } private void button1_Click(object sender, System.EventArgs e) { //Create a ArrayList for xRefs of PDF document． ArrayList xRefs=new ArrayList(); //Byte[] buffer=null; float yPos =0f; long streamStart=0; long streamEnd=0; long streamLen =0; string strPDFMessage=null; //PDF文档头信息 strPDFMessage="%PDF-1.1/n"; ConvertToByteAndAddtoStream(strPDFMessage); //ID 1 For Containt //ID 2 For Length of the Stream //write the Text //1＞ Start a new Page xRefs.Add(mPDF.Length); strPDFMessage="1 0 obj/n"; ConvertToByteAndAddtoStream(strPDFMessage); strPDFMessage="＜＜ /Length 2 0 R ＞＞/n"; ConvertToByteAndAddtoStream(strPDFMessage); strPDFMessage="stream/n"; ConvertToByteAndAddtoStream(strPDFMessage); //Get the start of the stream ////////PDF文档描述 streamStart=mPDF.Length; //字体 strPDFMessage="BT/n/F0 " + fontSize +" Tf/n"; ConvertToByteAndAddtoStream(strPDFMessage); //PDF文档实体高度 yPos = pageDepth - pageMargin; strPDFMessage=pageMargin + " " + yPos +" Td/n" ConvertToByteAndAddtoStream(strPDFMessage); strPDFMessage= leadSize+" TL/n" ConvertToByteAndAddtoStream(strPDFMessage); //Add the text data to the PDF memory stream //实体内容 strPDFMessage= "(这是一个PDF文件)Tj/n" ConvertToByteAndAddtoStream(strPDFMessage); strPDFMessage= "ET/n"; ConvertToByteAndAddtoStream(strPDFMessage); //Get the End of the stream streamEnd=mPDF.Length; //Get the Length of the stream streamLen=streamEnd-streamStart; strPDFMessage= "endstream/nendobj/n"; ConvertToByteAndAddtoStream(strPDFMessage); //PDF文档的版本信息 //Add 2 object to xRef xRefs.Add(mPDF.Length); strPDFMessage="2 0 obj/n"+ streamLen + "/nendobj/n"; ConvertToByteAndAddtoStream(strPDFMessage); //Add Page to xRefs xRefs.Add(mPDF.Length); strPDFMessage="3 0 obj/n＜＜/Type/Page/Parent 4 0 R/Contents 1 0 R＞＞/nendobj/n"; ConvertToByteAndAddtoStream(strPDFMessage); //Build the Pages xRefs.Add(mPDF.Length); strPDFMessage="4 0 obj/n＜＜/Type /Pages /Count 1/n"; ConvertToByteAndAddtoStream(strPDFMessage); strPDFMessage="/Kids[/n3 0 R/n]/n"; ConvertToByteAndAddtoStream(strPDFMessage); strPDFMessage="/Resources＜＜/ProcSet[/PDF/Text]/Font＜＜/F0 5 0 R＞＞ ＞＞/n"; ConvertToByteAndAddtoStream(strPDFMessage); strPDFMessage="/MediaBox [ 0 0 "+ pageWidth + " " + pageDepth + " ]/n＞＞/nendobj/n"; ConvertToByteAndAddtoStream(strPDFMessage); //Add font to xRefs xRefs.Add(mPDF.Length); strPDFMessage="5 0 obj/n＜＜/Type/Font/Subtype/Type1/BaseFont/Courier/Encoding/WinAnsiEncoding＞＞/nendobj/n"; ConvertToByteAndAddtoStream(strPDFMessage); //Add the catalog to xRefs xRefs.Add(mPDF.Length); strPDFMessage="6 0 obj/n＜＜/Type/Catalog/Pages 4 0 R＞＞/nendobj/n"; ConvertToByteAndAddtoStream(strPDFMessage); //xRefs Entry streamStart=mPDF.Length; strPDFMessage="xref/n0 7/n0000000000 65535 f /n"; for(int i=0;i＜xRefs.Count;i++) { strPDFMessage+=xRefFormatting((long) xRefs[i])+" 00000 n /n"; } ConvertToByteAndAddtoStream(strPDFMessage); //Trailer for the PDF strPDFMessage="trailer/n＜＜/n/Size "+ (xRefs.Count+1)+"/n/Root 6 0 R/n＞＞/n"; ConvertToByteAndAddtoStream(strPDFMessage); //xRef location entry strPDFMessage="startxref/n" + streamStart+"/n%%EOF/n"; ConvertToByteAndAddtoStream(strPDFMessage); //Write the PDF from Memory Stream to File Stream mPDF.WriteTo(pPDF.BaseStream); //Close the Stream mPDF.Close(); pPDF.Close(); } } }

　　按F9运行程序，点“生成PDF”按钮试试。注：以上代码是网上copy来的，有兴趣的可以研究研究。