:: Home :: Products :: Technical Support :: About Us :: Contact Us
PDF Printer Driver, Convert to PDF, Print to PDF
Example 4: Stamp a PDF file with a PDF overlay (Delphi)  

uses ComObj;

procedure TForm1.Button1Click(Sender: TObject);
  NVstamp : Variant;
  indx : Integer;
  retVal : Integer;
  NVstamp := CreateOLEObject('PDFstamp.Neevia');

  indx := NVstamp.CreateNewStamp;
  NVstamp.Stamps[indx].StampType := 3;
  NVStamp.Stamps[indx].Name := 'Stamp1';
  NVStamp.Stamps[indx].PDFOverlayFile := 'c:\overlay.pdf';
  NVStamp.Stamps[indx].X := 'center';
  NVStamp.Stamps[indx].Y := 'center';
  NVStamp.Stamps[indx].PlaceAs := 1;

  retVal := NVStamp.StampPDF('c:\in.pdf', 'c:\out.pdf');

  if retVal <> 0 then
    Application.MessageBox(PChar('Error code=' + IntToStr(retVal)),'',0)


After testing PDFsign I can certainly say that it makes the signing of PDF documents easy for anyone who needs to perform such a task.

Martin Leary

If you have any comments or suggestions about our web site, please feel free to email them to

Copyright © 2018 neeviaPDF.com Home | Products | Support | About Us | Contact Us