Neevia Technology Sites:   www.neevia.com  |  docuPub.com  |  www.neeviaPDF.com
:: Home :: Products :: Technical Support :: About Us :: Contact Us
Technical support > Neevia docCreator code samples
Example 8: Convert a PostScript document into PDF from Delphi  Print Example 


procedure createPDF();
var
  DC : Variant;
  RVal : Integer;
  docToConvert : String;
begin
  docToConvert := 'd:\test.ps';

  try
    DC := CreateOleObject('Neevia.docCreator');
    DC.setParameter('DocumentOutputFormat', 'PDF');
    DC.setParameter('DocumentOutputName', 'testPS_Delphi');
    DC.setParameter('DocumentOutputFolder', 'd:\');

    RVal := DC.setInputDocument(docToConvert);
    If (RVal <> 0) Then
      ShowMessage('Error while creating document!!! Code: '+IntToStr(RVal))
    else
      ShowMessage('Done converting !!!');
  finally
    DC := Unassigned;
  end;
end;



Copyright © 1999-2016 Neevia Technology. All Rights Reserved. Home | Products | Technical Support | About Us | Contact Us