Click here to Skip to main content
Click here to Skip to main content

PDF creation using C# (and Office) from RTF/DOC files

, 25 Feb 2004
Rate this:
Please Sign up or sign in to vote.
Converts RTF, DOC to PDF; sample is a part of a big Project that converts nearly everything, parts can be used to convert html, bmp ,Lotus 1-2-3 documents...

Introduction

Some time ago I had to write a C# application that was able to convert documents into various formats. The hardest part was to find a way to create PDF files without the use of any third party products. Here is a solution.

Background

The source you see is out of a larger conversion-application. It is a "stand alone" projects, for educational use and describes a possible way of converting documents. I took me a lot of work to figure this out, so please don't copy the code; drop me a line if you wish to use a part of it. My comments are written in German, I had no time to build a proper release, sorry for that.

Using the code

The code listed below describes the main part of the program. I will give you a brief look, at the idea behind. Crystal reports (the .NET reporting system) is able to create PDF files. The only problem is it can only create PDF files out of a database. It requires an ole objects in the Database. But if you have a (very) close look at CR (IDA Smile | :) ) you will find out that it is able to process, bmp, emf, and wmf. So we only have to insert this kind of data in to a table (as blob) and hand it over to CR. Emf can be created by using PowerPoint, PPT can read html, WinWord can create html. The only problem left is the organization of our pages, we have to split the document manually, I did this by using a Richtextbox.

Now that we know the Way we can convert a rtf into a PDF:

  1. We load the rtf into a richtextbox.
  2. We split in into parts. every part is loaded into WinWord, saved as html, the WinWord header is being destroyed, the html page is loaded into PowerPoint and saved as emf. The emf file is written into a Access database as a blob object.
  3. Crystal Reports gets a rpt "template" the database the report is being created and saved as PDF.

I tried to use Ole32 functions, but I didn't find a way to accomplish this, if you know a way in C#.NET please let me know.

   private static void DoRTF2ALL(
      CrystalDecisions.Shared.ExportFormatType outTp)
    {
      int lastsplit = 0;
      int nextsplit = 0;
      int pageheight= 650;  //"Länge" unserer Seite
      int pcount= 1;
      Point xx;
      object Unknown =Type.Missing;
      Word.Application newApp;
      PowerPoint.Application  app;
      PowerPoint.Presentation ppp;
      string[] TempEnt;
      

      
      RichTextBox rtf = new RichTextBox();
      rtf.Height=25000;// nur page size required
      rtf.Width=4048;// Solle reichen
      //Console.WriteLine(rtf.Bounds.ToString());
      rtf.LoadFile(scrfile, RichTextBoxStreamType.RichText);
      nCoreHlp.EmptyDB(WorkDir + "\\" + Database);
      while ((lastsplit+1)<rtf.Text.Length) ////start page split
      {


        // die ersten paar seiten wegschneiden
        rtf.SelectionStart = 0;
        rtf.SelectionLength =lastsplit;
        rtf.Cut();
        for (int r=0;r<=rtf.Text.Length;r++) ////parse through whole text
        {
          xx = rtf.GetPositionFromCharIndex(r);
          nextsplit = rtf.Text.Length;
          if (int.Parse(xx.Y.ToString()) > pageheight)
              {nextsplit=r-1;r=rtf.Text.Length;}
          
        }
        lastsplit=lastsplit+nextsplit;// ende wegschneiden
        rtf.SelectionStart = nextsplit;
        rtf.SelectionLength =rtf.Text.Length-nextsplit;
        rtf.Cut();
        rtf.SaveFile(WorkDir + \\temp.rtf, 
               RichTextBoxStreamType.RichText);
        //////////////////////////////////////////// insert db
        newApp = new Word.Application(); 
        newApp.Visible = false;

        object Source=WorkDir + "\\temp.rtf";
        object Target=WorkDir + "\\temp.html";

        newApp.Documents.Open(ref Source,ref Unknown, 
          ref Unknown,ref Unknown,ref Unknown, 
          ref Unknown,ref Unknown,ref Unknown, 
          ref Unknown,ref Unknown,ref Unknown, 
          ref Unknown,ref Unknown,ref Unknown,ref Unknown);

        object format = Word.WdSaveFormat.wdFormatHTML;// kein XML, nutzen?
        newApp.ActiveDocument.SaveAs(ref Target,ref format, 
          ref Unknown,ref Unknown,ref Unknown, 
          ref Unknown,ref Unknown,ref Unknown, 
          ref Unknown,ref Unknown,ref Unknown, 
          ref Unknown,ref Unknown,ref Unknown, 
          ref Unknown,ref Unknown);
        newApp.Quit(ref Unknown,ref Unknown,ref Unknown);
      
        //kill word head
        StreamReader sr;
        bool not=true;
        while (not)
        {
          try
          {

            sr = new StreamReader(WorkDir + "\\temp.html");
            not=false;
            StreamWriter sw = new StreamWriter(WorkDir + "\\temp.txt"); 
            String line;

            while ((line = sr.ReadLine()) != null) 
            {
              if (line.CompareTo(
                "<meta name=ProgId content=FrontPage.Editor.Document>")!=0)
                sw.WriteLine(line); else
                //line.Replace //Marina
                sw.WriteLine("<meta name=ProgId content=Word.Documens>");
            }

            sr.Close();
            sw.Flush();
            sw.Close();

          }
          catch (Exception e){e=e;}
        }// kill word head end
      
        File.Delete(WorkDir + "\\temp.html");
        File.Move(WorkDir + "\\temp.txt", WorkDir + "\\temp.html");
        //File.Delete(WorkDir + "\\temp.txt");        


        app = new PowerPoint.Application();
        ppp = app.Presentations.Open(WorkDir + "\\temp.html",
          /*Microsoft.Office.Core.MsoTriState.msoCTrue*/0,
          /*Microsoft.Office.Core.MsoTriState.msoTrue*/0,
          Microsoft.Office.Core.MsoTriState.msoFalse);//visible? immer no
        ppp.SaveAs(WorkDir + "\\temp",
          PowerPoint.PpSaveAsFileType.ppSaveAsEMF,
          Microsoft.Office.Core.MsoTriState.msoFalse);
        app.Quit();

        //output fangen
        TempEnt = Directory.GetFiles(WorkDir + "\\temp\\", "*.emf");
        nCoreHlp.InsertDB1(WorkDir + "\\" + Database,TempEnt[0],pcount);
        pcount++;
        Console.WriteLine("1 Page Converted");// debug
        //Console.ReadLine();
        ////////////////////////////////////////////////// insert db off
        rtf.LoadFile(scrfile, RichTextBoxStreamType.RichText);

      }//////////// page split done
      ///Create PDF
      ReportDocument doc = new ReportDocument();

      doc.Load(WorkDir + "\\DtoD.rpt");
      doc.Database.Tables[0].Location = (WorkDir + "\\DtoD.mdb");

      doc.ExportOptions.ExportFormatType = outTp;
      doc.ExportOptions.ExportDestinationType =
              ExportDestinationType.DiskFile;
      //DiskFileDestinationOptions
      DiskFileDestinationOptions diskOpts = new DiskFileDestinationOptions();
      diskOpts.DiskFileName = dstfile;
      doc.ExportOptions.DestinationOptions = diskOpts;
      doc.Export();
      doc.Close();
      Directory.Delete(WorkDir + "\\temp\\", true);
      File.Delete(WorkDir + "\\temp.rtf");
      File.Delete(WorkDir + "\\temp.html");
    }
      

Points of Interest

MS-Office 2000 or < has to be installed. I included the Word & PowerPoint interfaces in the project , the C# dlls are only in the bin/debug directory, because of the file size.

History

  • 1st version of the demo project.

License

This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.

A list of licenses authors might use can be found here

About the Author

No Biography provided

Comments and Discussions

 
GeneralSource Code PinmemberJansen20823-Sep-08 4:51 
GeneralRe: Source Code PinmemberAhmedSuria10-Oct-08 3:02 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.

| Advertise | Privacy | Mobile
Web03 | 2.8.140709.1 | Last Updated 26 Feb 2004
Article Copyright 2004 by Stefan Eberhardt
Everything else Copyright © CodeProject, 1999-2014
Terms of Service
Layout: fixed | fluid