Stamping allows the printing of text and vectors over certain pages in a PDF file.
(Note: Stamping uses standard metafiles. Included bitmaps will be ignored, all text will be converted to vectors!)
If you intend to use the stamping feature on an internet or intranet server, you need a special WEB-License. Please see order page.
Display in WPViewPDF before saving. The text can be still changed.
When you save the PDF file the graphic will be permanently added to the document.
Display in Acrobat Reader - the stamp is permanently applied.
Delphi Example Code.
procedure TForm1.PrepareStamp(StampText : String);
var StampMetaCan : TMetafileCanvas;
aForm : TXForm;
begin
if StampText<>'' then
begin
StampMetaCan := TMetafileCanvas.Create(StampMeta,0);
try
StampMetaCan.Font.Height := -100;
StampMetaCan.Font.Color := clRed;
StampMetaCan.Font.Name := 'Arial';
StampMetaCan.Brush.Style := bsClear;
aForm.eM11 := 1;
aForm.eM12 := -0.5;
aForm.eM21 := 1;
aForm.eM22 := 1;
aForm.eDx := Screen.PixelsPerInch;
aForm.eDy := Screen.PixelsPerInch*2;
SetWorldTransform(StampMetaCan.Handle, aForm);
StampMetaCan.TextOut(0,0, StampText);
finally
StampMetaCan.Free;
end;
WPViewPDF1.CommandStrEx(495,'1-10000', StampMeta.Handle);
end else
begin
WPViewPDF1.CommandStrEx(495,'1-10000', 0);
end;
end;