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 10: Convert a PDF file into TIFF from Delphi  Print Example 


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

  try
    DC := CreateOleObject('Neevia.docCreator');

    DC.setParameter('DocumentOutputFormat', 'TIFF');
    DC.setParameter('DocumentOutputName', 'testTIFF_Delphi');
    DC.setParameter('DocumentOutputFolder', 'd:\');

    DC.setParameter('TIFFType', 'tiff24lzw');

    DC.setParameter('DocumentResolution', '150');

    DC.setParameter('MPTiff', 'True');

    DC.setInputDocument(docToConvert);
    RVal := DC.create;
    if (RVal <> 0) then
       ShowMessage('Error while creating document!!! Code: '+IntToStr(RVal))
    else
       ShowMessage('Document Created !!!');
  finally
    DC := Unassigned;
  end;
end;



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